vb@rchiv
VB Classic
VB.NET
ADO.NET
VBA
C#
Schützen Sie Ihre Software vor Software-Piraterie - mit sevLock 1.0 DLL!  
 vb@rchiv Quick-Search: Suche startenErweiterte Suche starten   Impressum  | Datenschutz  | vb@rchiv CD Vol.6  | Shop Copyright ©2000-2025
 
zurück

 Sie sind aktuell nicht angemeldet.Funktionen: Einloggen  |  Neu registrieren  |  Suchen

VB & Datenbanken
Problem mit SQL-Execute von VB aus 
Autor: antonyus
Datum: 29.12.05 16:46

Hallo,

ich habe ein Problem..

Ich habe ein Klassenmodul, wo ich einige Funktionen für DB-Connection geschrieben habe. (Connect, Disconnect, execute usw...)

Dort habe ich folgende Code:

Public Sub Execute(p_sSQL As String, ByRef p_rs As ADODB.Recordset)

On Error GoTo L_ERROR

If IsConnected Then

Set p_rs = oConnection.Execute(p_sSQL)

End If

L_EXIT:
Exit Sub

L_ERROR:
MsgBox Err.Description
On Error Resume Next
Resume L_EXIT

-----
Und danach in Form mit einem CommadClick möchte ich ein DB-Update ausführen.
Dafür habe ich folgende Code:

Dim sSQLYes As String

sSQLYes = "UPDATE " & oConn.DBSchema & ".SEL_INSERT_REC " & _
"SET YESNO = 'YES' " & _
"WHERE basekey = '" & whichbasekey & "'"

oConn.execute (sSQLYes)
------

Danach bekomme ich folgende Fehlermeldung:

Fehler beim kompilieren: Argument ist nicht optional.

und .execute is markiert.

Kann jemand helfen?

Danke im Voraus..

Antonyus
alle Nachrichten anzeigenGesamtübersicht  |  Zum Thema  |  Suchen

 ThemaViews  AutorDatum
Problem mit SQL-Execute von VB aus863antonyus29.12.05 16:46
Re: Problem mit SQL-Execute von VB aus594_Stephan_29.12.05 22:29

Sie sind nicht angemeldet!
Um auf diesen Beitrag zu antworten oder neue Beiträge schreiben zu können, müssen Sie sich zunächst anmelden.

Einloggen  |  Neu registrieren

Funktionen:  Zum Thema  |  GesamtübersichtSuchen 

nach obenzurück
 
   

Copyright ©2000-2025 vb@rchiv Dieter Otter
Alle Rechte vorbehalten.
Microsoft, Windows und Visual Basic sind entweder eingetragene Marken oder Marken der Microsoft Corporation in den USA und/oder anderen Ländern. Weitere auf dieser Homepage aufgeführten Produkt- und Firmennamen können geschützte Marken ihrer jeweiligen Inhaber sein.

Diese Seiten wurden optimiert für eine Bildschirmauflösung von mind. 1280x1024 Pixel