Hi,

Quick question.

I have a form on an asp page which is used to add additional users to
the DB, i.e. adding a UserID (PK on table), Password & Email.

The companies are allowed a max of 3 users. If the company only has
the default 1 user and wishes to add another 1 or 2, then the form
displays the current user details, not in text boxes as this is not an
adit data form. The additional user/s can be entered into 1/2 rows of
text boxes, user 2 & 3.

If they decide to add 2 new users, how do I add the additional 2
records to my db table on submit ?

I am using a MySQL DB.


This is the code I have from an update form which can edit the default
user.
How can I change this code to add the 2 new records ?

___________________________________________

<%

vUser = request.form("user")
vPass = request.form("pass")
vEmail = request.form("email")

uSQL = "UPDATE OrderStatusAccess SET "
uSQL = uSQL & "UserID= '" & vUser & "'"
uSQL = uSQL & ", Password = '" & vPass & "' "
uSQL = uSQL & ", Email ='" & vEmail & "'"
uSQL = uSQL & " WHERE CustomerID='" & session("customer") & "';"

Set RS = adoDataConn.Execute(uSQL)
%>
__________________________________________________________


Thanks for your help


David

Re: Add more than 1 record at once ? by Bob

Bob
Mon Jan 05 06:34:33 CST 2004

David wrote:
> Hi,
>
> Quick question.
>
> I have a form on an asp page which is used to add additional users to
> the DB, i.e. adding a UserID (PK on table), Password & Email.
>
> The companies are allowed a max of 3 users. If the company only has
> the default 1 user and wishes to add another 1 or 2, then the form
> displays the current user details, not in text boxes as this is not an
> adit data form. The additional user/s can be entered into 1/2 rows of
> text boxes, user 2 & 3.
>
> If they decide to add 2 new users, how do I add the additional 2
> records to my db table on submit ?
>
> I am using a MySQL DB.
>
>
> This is the code I have from an update form which can edit the default
> user.
> How can I change this code to add the 2 new records ?
>
> ___________________________________________
>
> <%
>
> vUser = request.form("user")
> vPass = request.form("pass")
> vEmail = request.form("email")
>
> uSQL = "UPDATE OrderStatusAccess SET "
> uSQL = uSQL & "UserID= '" & vUser & "'"
> uSQL = uSQL & ", Password = '" & vPass & "' "
> uSQL = uSQL & ", Email ='" & vEmail & "'"
> uSQL = uSQL & " WHERE CustomerID='" & session("customer") & "';"
>
> Set RS = adoDataConn.Execute(uSQL)

Why "Set RS"??? This query is not returning a record! Why force ADO to go to
the time and trouble of creating a recordset object that will simply be
discarded? Do this instead:

adoDataConn.Execute uSQL,,129

(129 is the addition of two constants: adCmdText (1) and adExecuteNoRecords
(128) - your queries will execute more efficiently if you specify the
commandtype and execution options instead of making ADO guess)

> %>
> __________________________________________________________
>
>
> Thanks for your help
>
>
> David

Create 2 INSERT statements using the passed values and execute them as
above.

Bob Barrows

--
Microsoft MVP - ASP/ASP.NET
Please reply to the newsgroup. This email account is my spam trap so I
don't check it very often. If you must reply off-line, then remove the
"NO SPAM"