Ayuda SQL con Visula basic

sayviorc
03 de Marzo del 2006
Necesito saber como hacer la conección con SQL
yo uso ADo pero la Referencia.
por ejemplo:

public Base as New ADODC.conecction
public Tablas as New ADODC.recorset

base.open "provider=MSDASQL;dsn=Nombre del odbc;pwd en caso que tenga clave"
with tabla
.set activeconection=base
.cursorlocation=iduser
.cursortype=locdynamic
.locktype=optimis
.open "Nombre de la tabla"
end with
quisiera saber como hago esto para SQL o si es lo mismo

CSDK
03 de Marzo del 2006
Public ADOCONN As New ADODB.Connection 'CONEXION*************
Public Function conex()

ADOCONN.ConnectionString = " Provider=SQLOLEDB.1;Persist Security Info=False;User ID=SA;Initial Catalog=SISVA;Data Source=HIGHLIFE"
ADOCONN.Open


End Function
Public Function desconectar()
ADOCONN.Close
End Function
LLAMADA A CONEXION
conex
RST_LIMSISTEM_DIA.Source = "DELETE FROM TB_EMPL_OPER"
RST_LIMSISTEM_DIA.ActiveConnection = ADOCONN
RST_LIMSISTEM_DIA.Open
RST_LIMSISTEM.Source = "DELETE FROM TB_EFI_D"
RST_LIMSISTEM.ActiveConnection = ADOCONN
RST_LIMSISTEM.Open
desconectar