Reply to thread

Message: [QUOTE="nsj_1983, post: 3336, member: 1485"] My code is [size=2][size=2][color=#0000ff]Private[/color][/size][size=2] [/size][size=2][color=#0000ff]Sub[/color][/size][size=2] Button1_Click([/size][size=2][color=#0000ff]ByVal[/color][/size][size=2] sender [/size][size=2][color=#0000ff]As[/color][/size][size=2] System.Object, [/size][size=2][color=#0000ff]ByVal[/color][/size][size=2] e [/size][size=2][color=#0000ff]As[/color][/size][size=2] System.EventArgs) [/size][size=2][color=#0000ff]Handles[/color][/size][size=2] Button1.Click [/size][size=2][color=#0000ff]Dim[/color][/size][size=2] strConn [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]String [/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] strSQL [/size][size=2][color=#0000ff]As[/color][/size][size=2] [/size][size=2][color=#0000ff]String [/color][/size][size=2][/size][size=2][color=#0000ff]Dim[/color][/size][size=2] Conn [/size][size=2][color=#0000ff]As[/color][/size][size=2] OleDb.OleDbConnection [/size][size=2][color=#0000ff]Dim[/color][/size][size=2] cmd [/size][size=2][color=#0000ff]As[/color][/size][size=2] OleDb.OleDbCommand Label1.Visible = [/size][size=2][color=#0000ff]False [/color][/size][size=2]strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _ "Data Source=C:\db2.mdb;" & _ "User ID=Admin;" & _ "Password=" [/size][size=2][color=#008000]'Pass the Connection string to OleDbConnection object. [/color][/size][size=2]Conn = [/size][size=2][color=#0000ff]New[/color][/size][size=2] OleDb.OleDbConnection(strConn) cmd = [/size][size=2][color=#0000ff]New[/color][/size][size=2] OleDb.OleDbCommand(strSQL, Conn) Conn.Open() [/size][size=2][color=#008000]'Build the SQL strings. [/color][/size][size=2]strSQL = "insert into table1 values( 99,'sad')" [/size][size=2][color=#0000ff]Try [/color][/size][size=2]cmd.ExecuteNonQuery() [/size][size=2][color=#0000ff]Catch[/color][/size][size=2] ex [/size][size=2][color=#0000ff]As[/color][/size][size=2] OleDb.OleDbException Label1.Visible = [/size][size=2][color=#0000ff]True [/color][/size][size=2]Label1.Text = ex.ToString [/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]Try [/color][/size][size=2]Conn.Close() [/size][size=2][color=#0000ff]End[/color][/size][size=2] [/size][size=2][color=#0000ff]Sub[/color][/size] [size=2][color=#0000ff][/color][/size] [size=2][color=#0000ff][/color][/size] [size=2][color=#0000ff][/color][/size] [size=2][color=#0000ff][/color][/size] [size=2][color=#0000ff][/color][/size] [size=2][color=#0000ff]The database table is table1 in db1.mdb.[/color][/size] [size=2][color=#0000ff][/color][/size] [size=2][color=#0000ff]the error occurs at cmd.ExecuteNonQuery()[/color][/size] [size=2][color=#0000ff][/color][/size] [size=2][color=#0000ff]could anyone help me . please! [/color][/size][/size] [/QUOTE]

Verification