title image


Smiley Re: Entweder...
Ich möchte direkt SQL benutzen.



Ich habe eine Lösung erarbeitet, die aber mehr an das Füllen einer Datenbank mit ADO erinnert.



FirstStep:



F = Me.txtFirma.Text



With RsT

.ActiveConnection = Cn

.CursorLocation = adUseClient

.CursorType = adOpenKeyset

.LockType = adLockOptimistic

.Source = " SELECT * FROM Eingangsdaten"

.Open



.AddNew

.Fields("Firma") = Me.txtFirma

.Fields("VName") = Me.txtVName '22

.Fields("NName") = Me.txtNName

.Fields("Strasse") = Me.txtStrasse

.Fields("Stadt") = Me.txtStadt

.Fields("Typ") = Me.txtSTyp

.Fields("Serien_Nr") = Me.txtSNR

.Fields("EingangsDatum") = Date

.Update

.Close

End With



Me.Command3.Value = True



Exit Sub

help:

With RsT

.Close

End With

GoTo FirstStep



Das funktioniert super, aber ist eben nicht 100% SQL

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: