i declared everything
in this function has an error:
Code:
if inc <>-1 then
dim cb as new oledb.oledbcommandbuilder(da)
dim dsnewrow as datarow
dsnewrow=ds.tables("ryan").newrow()
dsnewrow.item("ID")=textbox1.text
dsnewrow.item("Password")=textbox2.text