title image


Smiley Dann fehlen nur ein paar Hochkommas


Set db = CurrentDbsql = "SELECT tabArtikelLieferanten.ArtNr, tabArtikelLieferanten.LiefNr, tabArtikelLieferanten.EK "

sql = sql + "FROM tabArtikelLieferanten"

sql = sql + "WHERE tabArtikelLieferanten.ArtNr = '" & Clng([Forms]![frmBestellungen]![ufrmBestellpositionen]![txtArtNr]) & "' AND tabArtikelLieferanten.LiefNr = '" & CLng([Forms]![frmLieferanten]![txtLiefNr]) & "'"

Set rs = db.OpenRecordset(sql)


Martin
Atrus2711 ät gmx punkt net
Meine Beiträge zu MS Office betreffen stets Version 2000,
wenn nicht anders angegeben.




geschrieben von


Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: