Programación General > Visual Basic 6.0 e inferiores

 Bd Visual Basic 6.0 Y Sql Server2000

(1/1)

SOLO VISUAL PUEDE:
HOLA:

QUISIERA QUE ME AYUDARAS Y QUE ME DIJERAS CÓMO PUEDO MANIPULAR UNA BASES DE DATOS EN SQL SERVER 2000 MEDIANTE VISUAL BASIC 6.0, YA TENGO TODOS LOS FORMULARIOS EN VB6.0 PERO UTILIZO UNA BASE DE DATOS EN ACCESS 2000, HE TRANSFORMADO ESA BD A SQL SERVER Y AHORA QUIERO UTILIZAR ESTA PARA TRABAJAR CON ELLA.....¿CÓMO LE HAGO? ¿ME PUEDES AYUDAR?,...me puedes enviar información a mi correo TE LO AGRADECERÉ MUCHISIMO, YA QUE ES DE SUMA IMPORTANCIA........

GRACIAS

xxxNeOxxx:
hola, por mi vaga esperiencia te puedo decir que trabajar con sql(si conoces su sintaxis) desde visual basic es sumamente sencillo. Lo único que hay k hacer es conectarse al servidor sql y lanzarle sentencias sql(con sentencias me refiero tanto a select,insert,delete,etc).
Ahora si no conoces sql creo que se puede trabajar con un recordset para añadir, eliminar,etc. :alien:

SOLO VISUAL PUEDE:
AGRADEZCO MUCHO LA COLABORACIÓN E INFORMO  QUE YA HE PODIDO HACER LA CONEXIÓN DE VB CON SQL SERVER E INCLUSO HE PODIDO INSERTAR REGISTROS MEDIANTE "INSERT TO...." SOLO QUE PARA ELIMINAR REGISTROS MEDIANTE EL SIGUIENTE CÓDIGO:

Private Sub Elimina_Click()
 Set DB = New Connection
 DB.CursorLocation = adUseClient
 'DB.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                              "Data Source=" & App.Path & "\Evalua.mdb"
 DB.Open "Provider=SQLOLEDB.1;" & _
          "Integrated Security=SSPI;Persist Security Info=False;User ID=eval;Initial Catalog=Evaluasql;Data Source=powerweb\sqlserver2000"
 busca = CveAlumTxt.Text
 SQL = "DELETE * FROM Alumno WHERE CveAlum = '" & busca & "'"
 Set RS = DB.Execute(SQL)
End Sub

DONDE:
     busca: es la clave del alumno que va a eliminar
 
ME MARCA UN ERROR EN

SQL = "DELETE * FROM Alumno WHERE CveAlum = '" & busca & "'"

DICIENDO " SINTAXIS INCORRECTA CERCA DE LA PALABRA CLAVE "*"  "   ¿A QUÉ SE DEBE?

Cyclop:
Tienes que crear una conexion via ODBC el resto es lo mismo, para mayor informacion utiliza el entorno de datos y despues lo haces via codigo.


Salu2

Shiquilla:
La sintaxis de la Delete es:


--- Código: Text ---DELETE FROM Tabla WHERE Campo = LoQueSea 

Tu codigo sería así:


--- Código: Text ---SQL = "DELETE FROM Alumno WHERE CveAlum = '" & busca & "'" 
Saludos.

Navegación

[0] Índice de Mensajes