ola de nuevo aqui molestando pero es que en realidad no se mucho de SQL server y necesito ayuda para poder eliminar,.. este codigo que les pongo lo estoy utilizando para agregar osea guardar, asi como guardo de esta manera tambien lo puedo eliminar o es diferente?..
Private Sub KewlButtons1_Click()
Set cmd = New ADODB.Command
Set rsACS = New ADODB.Recordset
Set rsACS2 = New ADODB.Recordset
Set cmd.ActiveConnection = cnn1
cmd.CommandText = _
"select count(*) as sCNT from ocupahab where partcipante = '" & Trim(Combo2.Text) & "'"
rsACS.Open cmd, , adOpenDymanic, adLockBatchOptimistic
rsACS.MoveFirst
Do While Not rsACS.EOF
If (rsACS!sCNT > 0) Then
'Monitor "El ambito " & cIDAbrev & " Ya existe en la B.D."
Else
cmd.CommandText = "insert into ocupahab(partcipante, evento , fecha, planta,turno, habitacion) values ('" & Combo2.Text & "','" & Combo1.Text & "','" & Text1.Text + "','" & Text2.Text & "','" & Combo3.Text + "','" & Label9 + "')"
Text1.SetFocus
rsACS2.Open cmd, , adOpenDymanic, adLockBatchOptimistic
End If
rsACS.MoveNext
Loop
rsACS.Close
Unload Me
MsgBox "Datos Guardados"
End Sub
si le cambio la sentencia SELECT por DELETE sera que asi elimine si alguien me puede ayudar se lo agradeceria mucho.. y de antemano le doy las gracias... espero una respuesta.. aclaro el programa que utilizo es Visual Basic 6.0 con SQL server 2000
