1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

como posso utilizar o noMatch no vb6

Discussão em 'Programação' iniciada por priank, 21 de Dezembro de 2007. (Respostas: 5; Visualizações: 2025)

  1. priank

    priank Power Member

    como posso utlizar o vb 6? ajudem sff
    sera que uma referencia que nao tou a utilizar???
     
    Última edição: 21 de Dezembro de 2007
  2. Armadillo

    Armadillo Folding Member

    nomatch aplica-se a conexões do tipo dao. se usares uma conexao ado esquece...

    edit:
    porque queres usar o nomatch?
     
  3. priank

    priank Power Member

    eu tou a utilzar conexões do tipo dao.
    sera que perciso uma referencia adcional ou componente
     
  4. Armadillo

    Armadillo Folding Member

    mostra onde estas a tentar fazer o nomatch pf.
     
  5. priank

    priank Power Member

    e este o codigo:




    Código:
    Dim db As Database
    Dim tbl As Recordset
     
    Set db = OpenDatabase(App.Path & "\bd_clientes&artigos.mdb")
    Set tbl = db.OpenRecordset("security")
     
    If a <> "" And b <> "" Then
    If tbl.RecordCount > 0 Then
    tbl.MoveFirst
    tbl.Index = "ind_user"
    tbl.Seek "=", a
    If tbl.NoMatch Then
    MsgBox "O user não existe"
    Else
    If tbl!pass = b Then
    MsgBox "Bem Vindo"
    frmMenu.Show
    End If
    End If
     
     
     
     
    End If
    Else
    MsgBox "Por favor introduza um user name e uma pass"
     
    End If
     
    Última edição pelo moderador: 21 de Dezembro de 2007
  6. Armadillo

    Armadillo Folding Member

    sugestao: tens que usar o dao? é que o ado é muito mais potente.
    faz um breakpoint na linha em que usas o nomatch e ve qual o valor da propriedade .nomatch.
     

Partilhar esta Página