usted no puede apenas pasar este código:
SI existe (seleccionar * de los sysobjects donde los name='qryWebContacts y xtype='V')
CAER LA VISIÓN [dbo]. [qryWebContacts]
Ir
CREAR LA VISIÓN [dbo]. [qryWebContacts]
COMO
SELECCIONAR el strLogin COMO LoginEmail, strPassword COMO LoginPassword, ContactPK, CompanyFK
De dbo. Contactos
DONDE (NO (el strPassword ES NULO))
usted tiene que hacerlo en un procedimiento almacenado y después ejecutar ese procedimiento almacenado a través de código de VB