priank
21-12-2007, 16:48
como posso utlizar o vb 6? ajudem sff
sera que uma referencia que nao tou a utilizar???
sera que uma referencia que nao tou a utilizar???
|
View Full Version : como posso utilizar o noMatch no vb6 priank 21-12-2007, 16:48 como posso utlizar o vb 6? ajudem sff sera que uma referencia que nao tou a utilizar??? Armadillo 21-12-2007, 16:59 nomatch aplica-se a conexões do tipo dao. se usares uma conexao ado esquece... edit: porque queres usar o nomatch? priank 21-12-2007, 17:10 eu tou a utilzar conexões do tipo dao. sera que perciso uma referencia adcional ou componente Armadillo 21-12-2007, 17:15 mostra onde estas a tentar fazer o nomatch pf. priank 21-12-2007, 17:20 e este o codigo: 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 Armadillo 21-12-2007, 17:33 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. |