« previous next »
Pages: [1]

Author Topic: inserting data into sql database  (Read 4529 times)

timkool

  • Visitor
  • *
  • Posts: 3
    • View Profile
    • Email
inserting data into sql database
« on: 2009-05-15, 05:53:46 AM »
 Hello,


I'm new here and I have just started developing websites using VB ASP 3.5. Anyway, my questions is:

- In C# I can insert new data into tables using the below commands:

DataSetTableAdapters.TableNameTableADapter AddData = new DataSetTableAdapters.TableNameTableADapter()

AddData.Insert(
FirstEntry,
SecondData,
ThirdData)


Now im trying to do this in VB but its not working! Can someone please tell me how to do it?

I've gone through a lot of VB ASP books but they only tell you how to get data (SQL SOURCE, GRIDVIEW ..etc) and not how to add data.

Any advise appreciated. Thanks..




There are a couple of ways of doing this, but I find the following the easiest.

Code:

Dim Conn
Conn = "DSN=myDataSource" 'or a full connection string

Set rs = Server.CreateObject("ADODB.RecordSet")
SQL = "SELECT TOP 1 column1, column2 FROM myTable"
rs.Open SQL, Conn, 1, 3

rs.AddNew
rs("column1") = "SomeData"
rs("column2") = "SomeOtherData"
rs.Update

Set rs = Nothing

Believe it or not, that is all you need!





www.floatingtank.at
methadrostenol
Logged

dutch_619

  • Regular
  • **
  • Posts: 90
    • View Profile
    • Email
Re: inserting data into sql database
« Reply #1 on: 2009-05-15, 09:17:00 AM »
I could do it in PHP or even javascript using ADO.

Post the table name and field names and I'll hack up an example in VBscript/ASP real quick for you.

*** Edit ***

You really need to add a connect object as well as the recordset. Additionally a recordset EOF object to handle errors if the query object is not found. I would sanitize my inputs by using a regular expression parser and most critical of all... you MUST close a connection cleanly. The software we design here tends to asynchronous database hits, but it is important regardless of the method used. It is safer to open and close connections as needed and used rather than leaving it open.

« Last Edit: 2009-05-15, 09:36:33 AM by dutch_619 »
Logged

dutch_619

  • Regular
  • **
  • Posts: 90
    • View Profile
    • Email
Re: inserting data into sql database
« Reply #2 on: 2009-05-15, 09:40:04 AM »
...and an example straight from W3C schools ADO section
Code: [Select]
<html>
<body>

<%
set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"

sql="INSERT INTO customers (customerID,companyname,"
sql=sql & "contactname,address,city,postalcode,country)"
sql=sql & " VALUES "
sql=sql & "('" & Request.Form("custid") & "',"
sql=sql & "'" & Request.Form("compname") & "',"
sql=sql & "'" & Request.Form("contname") & "',"
sql=sql & "'" & Request.Form("address") & "',"
sql=sql & "'" & Request.Form("city") & "',"
sql=sql & "'" & Request.Form("postcode") & "',"
sql=sql & "'" & Request.Form("country") & "')"

on error resume next
conn.Execute sql,recaffected
if err<>0 then
  Response.Write("No update permissions!")
else
  Response.Write("<h3>" & recaffected & " record added</h3>")
end if
conn.close
%>

</body>
</html>



As well as some ripped from a functional database interface from work (non-proprietary)
Code: [Select]

var adoConn = new ActiveXObject("ADODB.Connection");
var adoRS = new ActiveXObject("ADODB.Recordset");
adoConn.Open(adoConnectString);
adoRS.Open(QString, adoConn, 1, 3);
var adoQstringEOF = adoRS.EOF
if (adoQstringEOF == false)
{
userNameFromDatabase.value = adoRS.Fields("Username").value;
passwordFromDatabase.value = adoRS.Fields("Password").value;
adoRS.Update;
adoRS.Close();
adoConn.Close();
}
else if (adoQstringEOF == true)
{
adoRS.Close();
adoConn.Close();
alert ("Username not found")
}
}


Logged
Pages: [1]
« previous next »