Link to home
Start Free TrialLog in
Avatar of msberth
msberth

asked on

adding data through a form to different tables in the database using ASP

I want to add some data through a form to  3 different tables in a database, but i seem to be getting some errors when running the asp program. i can only add to a single table . can u tell me where im going wrong?
The 3 tables are Items, ItemSupply and Suppliers.Code is below:

Item_name = Request.Form("Item_name")
Supplier_name = Request.Form("Supplier_name")
Quantity = Request.Form("Quantity")
Received_date = Request.Form("Received_date")
Order_number = Request.Form("Order_number")
Order_date = Request.Form("Order_date")
Buying_Price = Request.Form("Buying_Price")
Selling_Price = Request.Form("Selling_Price")

Set MyConn = Server.CreateObject("ADODB.Connection")
MyConn.Mode = adModeReadWrite
MyConn.Open "PROVIDER=Microsoft.Jet.OLEDB.4.0;DATA SOURCE=" & dbpath

Set RS=Server.CreateObject("ADODB.RecordSet")

RS.Open "Select Items.Item_name,Suppliers.Supplier_name,ItemSupply.Quantity,ItemSupply.Received_date,ItemSupply.Order_number,ItemSupply.Order_date, "&_
        "ItemSupply.Buying_Price,ItemSupply.Selling_Price "
            "From Items,ItemSupply,Suppliers", MyConn, adOpenDynamic, adLockPessimistic, adCMDText
             
RS.AddNew

  RS("Item_name")= Item_name
  RS("Supplier_name")= Supplier_name
  RS("Quantity")= Quantity
  RS("Received_date") = Received_date
  RS("Order_number")= Order_number
  RS("Order_date")=Order_date
  RS("Buying_Price")=Buying_Price
  RS("Selling_Price")=Selling_Price
 
RS.Update

RS.Close
MyConn.Close                                  
Avatar of ramesh12
ramesh12

msberth

           First of all you the query you wrote doesnt make any sense. Type the same query at the database (Query Analyser or Queries in Access whatever you are using) and find out if you get the results that you intended.

Second, I think we cannot update tables if you try to pull the data from different tables based on joins.
msberth,

Try creating three separate recordsets which update the database tables independently.  (using SQL Server? - Have you tried putting the processes in an SP or 3?).

Good luck!
ASKER CERTIFIED SOLUTION
Avatar of imranlakhani
imranlakhani

Link to home
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
Start Free Trial
Using 3 recorsets would certainly help.
Now when you said you were able to add to only one table, did you mean to say that the code as you put it is running with errors and also adding a record to one table but not the other.
Or did you mean that the code is running if  you put something like
RS.Open "Select Items.Item_name From Items", MyConn, adOpenDynamic, adLockPessimistic, adCMDText ......
and not running when you include the other tables.
And one more thing, can I know why you have 3 seperate tables with apparantely no connection between them?
More information like table structure would certainly help us solve your problem.