Sie sind aktuell nicht angemeldet.

Funktionen: Einloggen  |  Neu registrieren  |  Suchen

Re: Schreibschutz (ODBC Microsoft Access driver)
Autor: Ch_Ehl
Datum: 03.01.06 20:47
Hallo Stefan, hier ist der Code: Set gdb = New ADODB.Connection gdb.ConnectionString = "Provider=MSDASQL.1;Data Source=RullData;Persist Security Info=False" gdb.Open Set grs = New ADODB.Recordset With grs .Open "PakkeOrdre", gdb, adOpenDynamic, adLockOptimistic If Not .BOF Then .MoveFirst Do Until LocalBatch = .Fields!Batch .MoveNext Loop If .Fields!Status = "Under pakking" Then Respons = MsgBox("Kombinering " & LocalBatch & " er under pakking og kan ikke slettes fra databasen.", vbOK, "Sletting ikke mulig") Else .Delete End If .Close End With Set grs = Nothing gdb.Close 'Rulldata' ist der Datenquellenname für die ODBC Verbindung. Diese ist auf beiden Rechnern konfiguriert. Viele Grüße Christian

Schreibschutz (ODBC Microsoft Access driver)	1.211	Ch_Ehl	03.01.06 15:20
Re: Schreibschutz (ODBC Microsoft Access driver)	678	stefan220273	03.01.06 15:48
Re: Schreibschutz (ODBC Microsoft Access driver)	855	Ch_Ehl	03.01.06 20:47
Re: Schreibschutz (ODBC Microsoft Access driver)	817	stefan220273	04.01.06 09:02
Re: Schreibschutz (ODBC Microsoft Access driver)	691	Ch_Ehl	04.01.06 09:26
Re: Schreibschutz (ODBC Microsoft Access driver)	785	stefan220273	04.01.06 09:59
Re: Schreibschutz (ODBC Microsoft Access driver)	719	Ch_Ehl	04.01.06 14:53

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übersicht

Suchen