Programación General > Visual Basic 6.0 e inferiores

 Sql En Visual Basic

(1/1)

martin campos quintero:
Hola a todos, tengo un pequeño problema, espero me ayuden a resolverlo.

Resulta que tengo un programa en el cual elimino mediante sql un registro, supongamos que tengo la orden:

elimina * from registro where clave=13

eso funciona de maravilla, pero el problema es cuando quiero poner dos condiciones en where, por ejemplo clave y carrera. eso no sé como hacerlo.

Les pongo el código para que lo puedan apreciar:


--- Código: Text ---  Dim funDim cn As rdoConnectionDim en As rdoEnvironmentDim SQL As StringDim qy As New rdoQuery Set en = rdoEnvironments(0)Set cn = en.OpenConnection(dsname:="conexion", _    Prompt:=rdDriverCompleteRequired)  With qy   .Name = "BD"   .SQL = "Select * from docente Where no_tarjeta = ? "   .RowsetSize = 1   Set .ActiveConnection = cnEnd With   SQL = "Delete * From registro Where clave='" & Text1.Text & "' "                         cn.Execute SQL cn.Closeen.Close MsgBox "El registro ha sido eliminado con éxito", vbOKOnly, "SAD"   
Como hago para añadir en where que elimine el registro solo si clave=text1.text y carrera=text2.text   ?

De antemano muchas gracias

cpmario:
Intenta esto:


--- Código: Text ---SQL = "Delete * From registro Where clave='" & Text1.Text & "' AND carrera='" & Text2.Text & "'" 

 :comp:

martin campos quintero:
Muchisimas gracias cpmario, me funcionó de maravilla el código. Ahora podré continuar con la aplicación. Saludos.  :D

Navegación

[0] Índice de Mensajes