Pau Records - Adding of Records - Visual Basic & MS Access with database password

this vid is for educational purpose only..

the database password is "admin"

-- all codes --

Private Sub Command1_Click()
On Error Resume Next
Adodc1.Recordset.MoveFirst
Adodc1.Recordset.Find "username like '" & Text1.Text & "'"
If Text1.Text = "" Or Text2.Text = "" Then
MsgBox "You must enter an id and a password!", vbCritical + vbOKOnly, "Attention!"
Else
If Adodc1.Recordset.EOF = True Then

Adodc1.Recordset.AddNew
Adodc1.Recordset!UserName = Text1.Text
Adodc1.Recordset!pass = Text2.Text
Adodc1.Recordset.Update
Else
MsgBox "Id Already Taken!", vbCritical + vbOKOnly, "Add Record"
End If
End If
End Sub

Private Sub Form_Load()
On Error Resume Next
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\John Paulo\Desktop\try.mdb;Persist Security Info=False;Jet OLEDB:Database Password=admin"
Adodc1.RecordSource = "select * from table1″
Set DataGrid1.DataSource = Adodc1

End Sub

Category:

Education

Tags:

• programming
• software
• computer
• tutorial
• visual
• basic
• microsoft
• access
• database
• pau
• records

[danilator20081]

Thanks Dude

[romayne15]

@danilator20081 you're welcome dude.

[RandomWalkTheory]

does that music always come on when you launch access?

[romayne15]

@RandomWalkTheory hmmm not always.. LOL :)

[prasannavenkat]

Superb...Thank u so much

[manofdevotion]

tenk u s much

[Mern04]

pare pno pg delete button? pnu codes non? wah..

[Mern04]

nice man.. XD