du kan inte precis passera denna kodifierar:
OM finns (välj * från sysobjects var name='qryWebContacts och xtype='V')
TAPPA BESKÅDAR [dboen]. [qryWebContacts]
Gå
SKAPA BESKÅDAR [dboen]. [qryWebContacts]
SOM
VÄLJ strLogin SOM LoginEmail, strPassword SOM LoginPassword, ContactPK, CompanyFK
FRÅN dbo. Kontakter
VAR (INTE (strPassworden ÄR OGILTIG)),
du måste att göra den in i ett lagrat tillvägagångssätt och därefter att utföra att alltigenom VB för det lagrade tillvägagångssättet kodifierar