ASP.NET database help.

all new to asp this is what i have so far, need to write data from a form into my new database. can someone help, any code example i can add to this, just something simple like wrting something to the database.

could you please use my code below as it make it easy for some on new like me.

<%@ Page Language="VB" ContentType="text/html" ResponseEncoding="iso-8859-1" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
      <script language="VB" runat="server">
      Dim nRecCount As Integer
      Dim Query As String = "select * from members"
      Dim dbconn=New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; data source=" & server.mappath("cl.mdb"))
      Dim mySelectCommand as OleDbCommand = New OleDbCommand(Query, dbconn)
    Dim myOleDbDataAdapter as OleDbDataAdapter = new OleDbDataAdapter(mySelectCommand)
      dbconn.Close()
      </script>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>

</body>
</html>
LVL 12
pigmentartsAsked:
Who is Participating?
I wear a lot of hats...

"The solutions and answers provided on Experts Exchange have been extremely helpful to me over the last few years. I wear a lot of hats - Developer, Database Administrator, Help Desk, etc., so I know a lot of things but not a lot about one thing. Experts Exchange gives me answers from people who do know a lot about one thing, in a easy to use platform." -Todd S.

AerosSagaCommented:
here ya go:

<TABLE cellSpacing="0" cellPadding="5" width="550" border="0">
                                          <TR>
                                                <TD class="PageHeader" style="HEIGHT: 24px" colSpan="2">Add New Product</TD>
                                          </TR>
                                          <TR>
                                                <TD width="192">Product&nbsp;Name</TD>
                                                <TD width="338"><asp:textbox id="ProductName" runat="server" CssClass="ThinInput" Columns="15" MaxLength="50"></asp:textbox>&nbsp;&nbsp;
                                                      <asp:requiredfieldvalidator id="ProductNameValidator" runat="server" Enabled="true" EnableClientScript="False"
                                                            ControlToValidate="ProductName" ErrorMessage="Please enter a name."></asp:requiredfieldvalidator></TD>
                                          </TR>
                                          <TR>
                                                <TD style="HEIGHT: 15px" width="192">Tier1</TD>
                                                <TD style="HEIGHT: 15px" width="338"><asp:dropdownlist id="Tier1" runat="server" Width="150px" AutoPostBack="True"></asp:dropdownlist>&nbsp;
                                                      <asp:requiredfieldvalidator id="Tier1Validator" runat="server" Enabled="true" EnableClientScript="False" ControlToValidate="ProductName"
                                                            ErrorMessage="Please select a tier1."></asp:requiredfieldvalidator></TD>
                                          </TR>
                                          <TR>
                                                <TD width="192">Tier2&nbsp; <SPAN class="SmallText">(optional)</SPAN></TD>
                                                <TD width="338"><asp:dropdownlist id="Tier2" runat="server" Width="150px" AutoPostBack="True"></asp:dropdownlist></TD>
                                          </TR>
                                          <TR>
                                                <TD width="192">Tier3&nbsp; <SPAN class="SmallText">(optional)</SPAN></TD>
                                                <TD width="338"><asp:dropdownlist id="Tier3" runat="server" Width="150px"></asp:dropdownlist></TD>
                                          </TR>
                                          <TR>
                                                <TD vAlign="top">Description <SPAN class="SmallText">(optional)</SPAN></TD>
                                                <TD><asp:textbox id="Description" runat="server" CssClass="ThinInput" Columns="35" MaxLength="255"
                                                            TextMode="MultiLine" Rows="3"></asp:textbox></TD>
                                          </TR>
                                          <TR>
                                                <TD style="HEIGHT: 34px">Picture <SPAN class="SmallText">(optional)</SPAN></TD>
                                                <TD style="HEIGHT: 34px"><INPUT class="ThinInput" id="ImageSrc" type="file" size="15" runat="server"></TD>
                                          </TR>
                                          <TR>
                                                <TD style="HEIGHT: 34px">Price <SPAN class="SmallText">(optional)</SPAN></TD>
                                                <TD style="HEIGHT: 34px"><asp:textbox id="Price" runat="server" CssClass="ThinInput" Columns="4" MaxLength="7"></asp:textbox></TD>
                                          </TR>
                                          <TR>
                                                <TD align="right" colSpan="2"><asp:button id="AddProduct" runat="server" CssClass="ThinButton" Width="98px" CausesValidation="False"
                                                            Text="Add Product"></asp:button></TD>
                                          </TR>
                                          <TR>
                                                <TD colSpan="2"><asp:label id="StatusLabel" runat="server"></asp:label></TD>
                                          </TR>
                                    </TABLE>

Region " AddProduct Button "
    Private Sub AddProduct_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles AddProduct.Click
        If IsRefresh Then Return

        ProductNameValidator.Enabled = True
        Tier1Validator.Enabled = True
        QueryValidator.Enabled = False
        Validate()

        If Not IsValid Then Return

        Dim cnn As New OleDb.OleDbConnection(ConfigurationSettings.AppSettings("SiteDB"))
        Dim cmd As New OleDb.OleDbCommand
        Dim IncomingFile As IO.FileInfo
        Dim ImageSource, PriceValue As String
        Dim ImageResizer As New ResizeImage(True, 300, 400)

        ImageResizer.ThumbX = 100
        ImageResizer.ThumbY = 100

        If ImageSrc.PostedFile.ContentLength <> 0 Then
            IncomingFile = New IO.FileInfo(Request.Files(0).FileName)
            IncomingFile = New IO.FileInfo(Server.MapPath("~/Pictures/Products/") & IncomingFile.Name)
            Request.Files(0).SaveAs(IncomingFile.FullName)
            ImageSource = ImageResizer.ResizeImage(IncomingFile.FullName)
        End If


        If Price.Text = "" Then
            PriceValue = "0"
        Else
            PriceValue = Price.Text
        End If

        cmd.CommandType = CommandType.Text
        cmd.CommandText = "INSERT INTO Products (Tier1ID, Tier2ID, Tier3ID, Name, " & _
            "Description, ImageSrc, Price) VALUES (" & Tier1.SelectedValue & ", " & _
            Tier2.SelectedValue & ", " & Tier3.SelectedValue & ", '" & DBSafe(ProductName.Text) & _
            "', '" & DBSafe(Description.Text) & "', '" & ImageSource & "', " & PriceValue & ")"
        cmd.Connection = cnn

        cnn.Open()
        cmd.ExecuteNonQuery()
        cnn.Close()

        cmd.Dispose()
        cnn.Dispose()

        LoadProductData()
    End Sub
#End Region

Let me know if you need any more help

Regards,

Aeros
0
AerosSagaCommented:
I define my connection string in my web.config, like so:

<appSettings>
            <add key="SiteDB" value="Provider=Microsoft.Jet.OleDb.4.0;Data Source=C:\Inetpub\wwwroot\DOTNETShoppingCart\Database\Site.mdb;"></add>
</appSettings>
0
pigmentartsAuthor Commented:
this is what i have, i need to write the data in to my database called cl.mdb the form, AerosSaga the code looks good but this is my first time with asp so i really want my code below to work so i can go though it. also i am getting a erro alsor...

Description: An error occurred during the compilation of a resource required to service this request. Please review the following specific error details and modify your source code appropriately.

Compiler Error Message: BC30188: Declaration expected.

Source Error:

 

Line 10:       Dim mySelectCommand as OleDbCommand = New OleDbCommand(Query, dbconn)
Line 11:     Dim myOleDbDataAdapter as OleDbDataAdapter = new OleDbDataAdapter(mySelectCommand)
Line 12:       dbconn.Close()
Line 13:       </script>
Line 14: <head>
 

-------------------
my code below: at the moment is does nothing just bring a error, what i want is it to write the stuff from the form to my database
-----------------------


 <%@ Page Language="VB" ContentType="text/html" ResponseEncoding="iso-8859-1" %>
<%@ Import Namespace="System.Data" %>
<%@ Import Namespace="System.Data.OleDb" %>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
      <script language="VB" runat="server">
      Dim nRecCount As Integer
      Dim Query As String = "select * from members"
      Dim dbconn=New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; data source=" & server.mappath("cl.mdb"))
      Dim mySelectCommand as OleDbCommand = New OleDbCommand(Query, dbconn)
    Dim myOleDbDataAdapter as OleDbDataAdapter = new OleDbDataAdapter(mySelectCommand)
      dbconn.Close()
      </script>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>

 <form runat="server">
 
 <input type="text" id="title" value="Title" runat="server"><br>
 <input type="text" id="first_name" value="First Name" runat="server"><br>
 <input type="text" id="last_name" value="Last Name" runat="server"><br>
 <input type="text" id="company_name" value="Company Name" runat="server"><br>
 <input type="text" id="number" value="House Number" runat="server"><br>
 <input type="text" id="street" value="Street" runat="server"><br>
 <input type="text" id="town" value="Town" runat="server"><br>
 <input type="text" id="postcode" value="Postcode" runat="server"><br>
 <input type="text" id="telephone" value="Telephone" runat="server"><br>
 <input type="text" id="fax" value="Fax" runat="server"><br>
 <input type="text" id="email" value="Email" runat="server"><br>
 <input type="text" id="password" value="Password" runat="server"><br>
 <input type="text" id="web_address" value="Web Address" runat="server"><br>
 <select id="sector" runat="server"><br>
                  <option>Automotive</option>
                  <option>Computers</option>  
                  <option>Construction</option>  
                  <option>Consumer Goods</option>  
                  <option>Education</option>  
                  <option>Electronics</option>
                  <option>Entertainment</option>  
                  <option>Financial Institution</option>  
                          <option>Insurance</option>  
                          <option>Government</option>  
                          <option>Military</option>  
                          <option>Public Sector</option>  
                          <option>Hospitality</option>  
                          <option>Recreation</option>  
                          <option>Leisure Industry</option>  
                          <option>Manugacturer</option>  
                          <option>Media</option>
                          <option>Medical</option>
                          <option>Health Services</option>
                          <option>Pharmaceuticals</option>
                          <option>Professional Services</option>
                          <option>Publishers</option>
                          <option>Retail</option>
                          <option>Telecommunications</option>
                          <option>Travel</option>
                          <option>Transportation</option>
                          <option>Other</option>
                         
 </select><br>
 <input type="submit" OnServerClick="add_new_member" value="Submit" runat="server"><br>
 
 </form>



</body>
</html>
0
Cloud Class® Course: Python 3 Fundamentals

This course will teach participants about installing and configuring Python, syntax, importing, statements, types, strings, booleans, files, lists, tuples, comprehensions, functions, and classes.

AerosSagaCommented:
Ok first thing if you want to perform a forward only type action such as writing to the database you would want to make it a datareader instead of a dataadapter, much more efficient, however you have a select command not an insert or update command so I guess the first question is what do you really want to do select for display in a datagrid, datalist, repeater or do you want to update your db with information from a form?  Let me know and we'll go from there.

Aeros

0
pigmentartsAuthor Commented:
sorry about this, I was just having a go, don’t really know what I am doing yet, but I am willing to learn by example, maybe if i explain better you can help

I have a database called cl.mdb, in there database is empty fields called title, name etc.

I need a form that the user can enter there details in like the one bellow

then once submited all this information gets put into my database. I have been told that I need to do it in asp.net vb no c# so they can change later if they like.

any example, and thank you in advanced


<form runat="server">
 
 <input type="text" id="title" value="Title" runat="server"><br>
 <input type="text" id="first_name" value="First Name" runat="server"><br>
 <input type="text" id="last_name" value="Last Name" runat="server"><br>
 <input type="text" id="company_name" value="Company Name" runat="server"><br>
 <input type="text" id="number" value="House Number" runat="server"><br>
 <input type="text" id="street" value="Street" runat="server"><br>
 <input type="text" id="town" value="Town" runat="server"><br>
 <input type="text" id="postcode" value="Postcode" runat="server"><br>
 <input type="text" id="telephone" value="Telephone" runat="server"><br>
 <input type="text" id="fax" value="Fax" runat="server"><br>
 <input type="text" id="email" value="Email" runat="server"><br>
 <input type="text" id="password" value="Password" runat="server"><br>
 <input type="text" id="web_address" value="Web Address" runat="server"><br>
 <select id="sector" runat="server"><br>
                  <option>Automotive</option>
                  <option>Computers</option>  
                  <option>Construction</option>  
                  <option>Consumer Goods</option>  
                  <option>Education</option>  
                  <option>Electronics</option>
                  <option>Entertainment</option>  
                  <option>Financial Institution</option>  
                          <option>Insurance</option>  
                          <option>Government</option>  
                          <option>Military</option>  
                          <option>Public Sector</option>  
                          <option>Hospitality</option>  
                          <option>Recreation</option>  
                          <option>Leisure Industry</option>  
                          <option>Manugacturer</option>  
                          <option>Media</option>
                          <option>Medical</option>
                          <option>Health Services</option>
                          <option>Pharmaceuticals</option>
                          <option>Professional Services</option>
                          <option>Publishers</option>
                          <option>Retail</option>
                          <option>Telecommunications</option>
                          <option>Travel</option>
                          <option>Transportation</option>
                          <option>Other</option>
                         
 </select><br>
 <input type="submit" OnServerClick="add_new_member" value="Submit" runat="server"><br>
 
 </form>


0
pigmentartsAuthor Commented:
ps i may also want a page after to confirm details on screen if you knwo what i mean
0
AerosSagaCommented:
This is about as simple as it gets:

Dim cnn As New OleDb.OleDbConnection(ConfigurationSettings.AppSettings("SiteDB"))
        Dim cmd As New OleDb.OleDbCommand
        Dim IncomingFile As IO.FileInfo

 If ImageSrc.PostedFile.ContentLength <> 0 Then ****You only need this if you are uploading pictures or files
            IncomingFile = New IO.FileInfo(Request.Files(0).FileName)
            IncomingFile = New IO.FileInfo(Server.MapPath("~/Pictures/Products/") & IncomingFile.Name)
            Request.Files(0).SaveAs(IncomingFile.FullName)
        End If

 cmd.CommandType = CommandType.Text  ****Substitute your textbox values for the ones I have here
        cmd.CommandText = "INSERT INTO Products (Tier1ID, Tier2ID, Tier3ID, Name, " & _
            "Description, ImageSrc, Price) VALUES (" & Tier1.SelectedValue & ", " & _
            Tier2.SelectedValue & ", " & Tier3.SelectedValue & ", '" & DBSafe(ProductName.Text) & _
            "', '" & DBSafe(Description.Text) & "', '" & ImageSource & "', " & PriceValue & ")"
        cmd.Connection = cnn

        cnn.Open()
        cmd.ExecuteNonQuery()
        cnn.Close()

        cmd.Dispose()
        cnn.Dispose()

Thats it and you just updated your db from a user populated form, and with a picture if you wanted ;)
0

Experts Exchange Solution brought to you by

Your issues matter to us.

Facing a tech roadblock? Get the help and guidance you need from experienced professionals who care. Ask your question anytime, anywhere, with no hassle.

Start your 7-day free trial
pigmentartsAuthor Commented:
thank you very much. been a good help, may need help later will post again. take care
0
AerosSagaCommented:
your very welcome glad I could be of service

Aeros
0
It's more than this solution.Get answers and train to solve all your tech problems - anytime, anywhere.Try it for free Edge Out The Competitionfor your dream job with proven skills and certifications.Get started today Stand Outas the employee with proven skills.Start learning today for free Move Your Career Forwardwith certification training in the latest technologies.Start your trial today
ASP.NET

From novice to tech pro — start learning today.