vous ne pouvez pas simplement passer ce code :
SI existe (choisir * à partir des sysobjects où les name='qryWebContacts et le xtype='V')
LAISSER TOMBER LA VUE [dbo]. [qryWebContacts]
Aller
CRÉER LA VUE [dbo]. [qryWebContacts]
AS
CHOISIR le strLogin COMME LoginEmail, strPassword COMME LoginPassword, ContactPK, CompanyFK
Du dbo. Contacts
LÀ OÙ (PAS (le strPassword EST NUL))
vous devez le transformer en procédé stocké et puis exécuter ce procédé stocké dans tout le code de VB