Problem With Database

[virusdude]

hi there

ive been trying to add data to an access database using binding but ive been unsucessfull each time
I simply cant add data to the database, from the text box that i have on a form

I have two textboxes on a form, name txtId, and txtName,

and i have a database named testing
table name : student

table fields : studentid
studentname

CAn anyone help me in trying to add data to this database from the form plz.
thanks

HELP PLZ

[nemaroller]

Post the code you're using...

[virusdude]

Private Sub studentDetails_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
txtAStudId.Enabled = False
addStudDataAdap.Fill(AddStudDataSet1, "Student")
bm = Me.BindingContext(AddStudDataSet1, "Student")

loadData()


End Sub

Private Sub loadData()
Dim Temp As Binding


'Connecting with database.
addStudDataAdap.Fill(AddStudDataSet1)

bm = Me.BindingContext(AddStudDataSet1, "Student")

Temp = New Binding("Text", AddStudDataSet1, "Student.appNum")
txtAAppNum.DataBindings.Add(Temp)
' Temp = New Binding("Text", AddStudDataSet1, "Student.studentId")
' txtAStudId.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.title")
txtATitle.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.middleName")
txtAMidName.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.lastName")
txtASurname.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.firstName")
txtAGivenName.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.formerName")
txtAFormerName.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.dob")
txtADob.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.citizenship")
txtACitizen.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.pAddress")
txtAPostAdd.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.pCity")
txtAPCity.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.pState")
txtAPState.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.pPostCode")
txtAPCode.DataBindings.Add(Temp)
Temp = New Binding("Text", StudDataSet1, "Student.pTelNum")
txtAPTel.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.pMobile")
txtAPMobile.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.hAddress")
txtAHomeAdd.DataBindings.Add(Temp)
Temp = New Binding("Text", StudDataSet1, "Student.hCity")
txtAHCity.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.hState")
txtAHState.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.hPostCode")
txtAHCode.DataBindings.Add(Temp)
Temp = New Binding("Text", StudDataSet1, "Student.hTelNum")
txtAHTel.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.wTelNum")
txtAWTel.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.emailAdd")
txtAEmail.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.gender")
txtAGender.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.country")
txtACountry.DataBindings.Add(Temp)
Temp = New Binding("Text", StudDataSet1, "Student.name1")
txtAName1.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.name2")
txtAName2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.name3")
txtAName3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.year1")
txtAYear1.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.year2")
txtAYear2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.year3")
txtAYear3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.institute1")
txtAIns1.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.institute2")
txtAIns2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.institute3")
txtAIns3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.date1")
txtADate1.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.date2")
txtADate2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.date3")
txtADate3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.credit1")
ComboACredit1.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.credit2")
ComboACredit2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.credit3")
ComboACredit3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.code1")
txtACCode1.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.code2")
txtACCode2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.code3")
txtACCode3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.semester1")
txtACSemester1.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.semester2")
txtACSemester2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.semester3")
txtACSemester3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.cyear1")
txtACYear1.DataBindings.Add(Temp)
Temp = New Binding("Text", StudDataSet1, "Student.cyear2")
txtACYear2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.cyear3")
txtACYear3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.cname1")
txtACName1.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.cname2")
txtACName2.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.cname3")
txtACName3.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.english")
ComboAEnglish.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.secondary")
ComboASecondary.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.engTest")
ComboAEngTest.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.score")
txtAScore.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.eTDate")
txtADate.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.studyUCBC")
ComboAUCBC.DataBindings.Add(Temp)
Temp = New Binding("Text", AddStudDataSet1, "Student.status")
ComboAStatus.DataBindings.Add(Temp)
End Sub

Private Sub cmdAdd_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmdAdd.Click
bm.EndCurrentEdit()
BindingContext(AddStudDataSet1, "Student").AddNew()
txtAAppNum.Focus()
MsgBox("Student successfully added to database ", vbOKOnly + vbInformation, "@ City Pizza")
End Sub
End Class