Private Sub MNUPROSAVE_Click()
str = "insert into profile(rollno,fathername,foccupation,mothername,moccupation,contactno,residentialno,mcontactno,annualincome,permanentaddress,tempaddress,pincode,pemailid,religion,caste,state,city,noofbrothers,noofsisters,schoolorclgstudied)values(' " & rno.Text & " ',' " & fname.Text & " ','" & focc.Text & " ',' " & mname.Text & " ',' " & mocc.Text & " '," & cno.Text & "," & resno.Text & "," & mcno.Text & ", " & ain.Text & " ,' " & pa.Text & " ',' " & ta.Text & " '," & pin.Text & ",' " & pemail.Text & " ',' " & reli.Text & " ',' " & cas.Text & " ',' " & stat.Text & " ',' " & cit.Text & " ', " & nob.Text & " , " & nos.Text & ",' " & sch.Text & "')"
cn.Execute (str)
MsgBox ("DETAILS ADDED ")
End Sub
while executing the above code i got an
run time error'-2147217900(80040e14)'
syntax error in insert into statement

New Topic/Question
Reply



MultiQuote




|