Public Sub clave()
Dim adapt As New OleDbDataAdapter
Dim setda As New DataSet
Dim com = conexion.CreateCommand
Try
com.CommandType = CommandType.Text
com.CommandText = "SELECT Password From Clave Where Password = ('" & TextClave.Text & "')"
adapt.SelectCommand = com
adapt.Fill(setda, "Clave")
'aquí cargo el datasource y el datamenber del datagrid
Catch
MsgBox("Compruebe sus datos", MsgBoxStyle.Information, "Aviso GesDreamtPos")
End Try
End Sub
pero ahora no se como hacer un if dónde diga si la clave es correcta haz esto si no esto otro....alguna idea?
