one piece missing

naleignix · Apr 28, 2012

Hi, My script is almost done (thanks Xanderno) except for one thing. I can open up the connection and close it but I dont know how to write to it. I have tried: conServices.Open() cmdInsert.ExecuteNonQuery() conServices.Close() But it keeps throwing up Runtime errors. does anybody know any other ways I can write to the database? my script is..... <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OleDb" %> <Script Runat="Server"> Sub Button_Click(s as Object, e as EventArgs) Dim conServices as OleDbConnection Dim strInsert as String Dim cmdInsert as OleDbCommand conServices = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:hostingwebhost4lifememberjasoncdatabasess ervices.mdb") strInsert = "Insert Into (first_name,last_name) Values ("' & txtFirstname.Text & '","' & txtLastname.Text & '") " cmdInsert = New OleDbCommand(strInsert, conServices) conServices.Open() conServices.Close() response.redirect("http://www.msn.com") End Sub </Script> <html> <head><title>Submit Form</title></head> <body> <form runat="Server"> first Name: <asp:TextBox id="txtFirstname" runat="Server" /> Last Name: <asp:TextBox id="txtLastname" runat="Server" /> <asp:Button Text="Submit" OnClick="Button_Click" Runat="Server" /> <asp:Label id="lblMessage" runat="server" /> </form> </body> </html> Thank You. JCHere ya go....Copy this code, and run it as is. It should work....I changed the db name, and tested it on my system, and it worked beautifully. If you still have problems, most likely, your DB is read only. Make sure that the permissions are set correctly. This code is good though, so it isn't a code problem. <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OleDb" %> <%@ Page Language="VB" Debug="true" %> <Script Runat="Server"> Sub Button_Click(s as Object, e as EventArgs) Dim conServices as OleDbConnection Dim strInsert as String Dim cmdInsert as OleDbCommand conServices = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:hostingwebhost4lifememberjasoncdatabasess ervices.mdb")) strInsert = "Insert Into Services (first_name,last_name) Values ('" & txtFirstname.Text & "','" & txtLastname.Text & "')" cmdInsert = New OleDbCommand(strInsert, conServices) conServices.Open() cmdInsert.ExecuteNonQuery() conservices.Close() Response.Redirect("http://www.msn.com") End Sub </Script> <html> <head><title>Submit Form</title></head> <body> <form runat="Server"> first Name: <asp:TextBox id="txtFirstname" runat="Server" /> Last Name: <asp:TextBox id="txtLastname" runat="Server" /> <asp:Button Text="Submit" OnClick="Button_Click" Runat="Server" /> </form> <% Response.Write(Server.MapPath("/")) %> </body> </html>I jacked it up when I posted it...And added a little left over from my run. Here ya go...Corrected. <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.OleDb" %> <%@ Page Language="VB" Debug="true" %> <Script Runat="Server"> Sub Button_Click(s as Object, e as EventArgs) Dim conServices as OleDbConnection Dim strInsert as String Dim cmdInsert as OleDbCommand conServices = New OleDbConnection("PROVIDER=Microsoft.Jet.OLEDB.4.0;Data Source=C:hostingwebhost4lifememberjasoncdatabasess ervices.mdb") strInsert = "Insert Into Services (first_name,last_name) Values ('" & txtFirstname.Text & "','" & txtLastname.Text & "')" cmdInsert = New OleDbCommand(strInsert, conServices) conServices.Open() cmdInsert.ExecuteNonQuery() conservices.Close() Response.Redirect("http://www.msn.com") End Sub </Script> <html> <head><title>Submit Form</title></head> <body> <form runat="Server"> first Name: <asp:TextBox id="txtFirstname" runat="Server" /> Last Name: <asp:TextBox id="txtLastname" runat="Server" /> <asp:Button Text="Submit" OnClick="Button_Click" Runat="Server" /> </form> </body> </html>

one piece missing

naleignix

New Member