Home   Artículos   Recursos   Foros   
Artíclos recientes publicados en Latindevelopers:

Visual C++: NSDoubleEdit: Un control para el manejo de números decimales en Visual C++.
Visual C++: Implementando una Calculadora en Visual C++
Visual C++: CCommandLine: Una clase para el uso de la linea de comando
Visual C++: Una clase para el manejo del Registro


Sql Server y Bisual Vasic 6.0

Visual Formularios, MDI, Módulos, Class, DataReports, Rutime y mas..

Moderador: jAngel

Sql Server y Bisual Vasic 6.0

Notapor kanndra el Mar Nov 01, 2005 5:19 pm

Sql Server y Bisual Vasic 6.0

Hola!

Bueno, e navegado por bastantes pag de Internet, y no logro encontrar algún manual para saber como se conecta una base de datos sql Server en visual Basic…

Mis dudas son las sigtes, la base de datos se crea en el sql Server? O desde visual Basic…
He trabajado antes con base de datos Access, por eso mis dudas…
Si es posible que me expliquen claramente cuales son los pasos a seguir… como por ejemplo como se realiza la conexión hasta como se crea la base de datos.

Se los agradecería un millón, desde ya me disculpo por mi ignorancia.


Saludos!!!
.:: KaNnDrA ::.
kanndra
Novato
Novato
 
Mensajes: 3
Registrado: Mar Nov 01, 2005 4:56 pm

Notapor patodeoz el Vie Oct 20, 2006 9:35 am

kanndra:

primero haremos esto sin codigo. solo tienes que insertar un "adodc" y luego boton derecho/propieades adodc1/general/ y buscas el primero que diga sql (no recuerdo el nombre) en la parte siguiente te mostrara todas las bases de datos sql que tngas en el computador lo seleccionas y listo.
despues t vas a las propiedades e recordsourse seleccionas la opcion 2 y la tabla que quieras que se vea y eso es todo. si tienes dudas mi correo es patodeoz@hotmail.com.

ahora si lo quieres hacer con codigo es el siguiente:

Debes de usar una coneccion

Private cnn As ADODB.Connection
Private RST As ADODB.Recordset
Set cnn = Nothing
Set RST = Nothing

CREAR LOS OBJETOS
Set cnn = New ADODB.Connection
Set RST = New ADODB.Recordset
nombase = nombre de la base de datos
pserversql = nombre del servidor
cnn.Open "PROVIDER=SQLOLEDB; " & _
"INITIAL CATALOG= " & alltrim(nombase) & " ; " & _
"Data Source=" & alltrim(pServerSql) & "; " & _
"integrated security=SSPI; " & _
"persist security info = True; "

abrir la tabla con seleccion de registros
Set rst = New ADODB.Recordset
sSql = "SELECT * FROM empleado WHERE numemp = '" & onumemp & "' "
rst.Open sSql, cnn, adOpenDynamic, adLockOptimistic, adCmdText

abrir la tabla con seleccion sin seleccion
Set rst = New ADODB.Recordset
sSql = "SELECT * FROM empleado "
rst.Open sSql, cnn, adOpenDynamic, adLockOptimistic, adCmdTable.

te iba a mandar un codigo de prueba pero al parecer no tiene opcion de adjuntar archivos
chau...
patodeoz
Novato
Novato
 
Mensajes: 1
Registrado: Vie Oct 20, 2006 9:21 am


Volver a Visual Basic / Visual Basic .NET

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 0 invitados