masters!!! i have made alterations on my program on VB6 and i have found out that i just have a litle conflict on my ado setting and it worked how i want it to be
i just want to ASK what will i add to my login page code so that it will become case sensitive
.heres my code for the login page
CODE
Private Sub cmdOk_Click()
Dim db_file As String
Dim statement As String
Dim conn As ADODB.Connection
Dim rs As ADODB.Recordset
' Open the database.
db_file = App.Path
If Right$(db_file, 1) <> "\" Then db_file = db_file & _
"\"
db_file = db_file & "data.mdb"
' Open a connection.
Set conn = New ADODB.Connection
conn.ConnectionString = _
"Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & db_file & ";" & _
"Persist Security Info=False"
conn.Open
' Look up the user name/password.
statement = "SELECT COUNT (*) FROM Users WHERE " & _
"UserName='" & Replace(txtUserName.Text, "'", "''") _
& "' AND " & _
"Password='" & Replace(txtPassword.Text, "'", "''") _
& "'"
Set rs = conn.Execute(statement)
' See if we got anything.
If CLng(rs.Fields(0)) < 1 Then
' There is no match.
' Do not allow the login.
Unload Me
MsgBox "Invalid user name/password."
Else
' There is a match.
' Display the program's main form.
Form1.Show
Unload Me
End If
rs.Close
conn.Close
End Sub
and also i want to ask if how will i be able to run my own created database on acess.. is it possible?? beside biblio.mdb that is included on my vb package???
i fixed it up in the connection property it succeded in the test connection but after i Run the whole program it cant read the database i connected within it..
files made from mic.acess 1997 are the ones running on my ado .. can i configure my own and make a new database with a new versions of m.acess??
4 Jan, 2008 - 03:37 AM
| 