How to select and insert using asp

[MrHelpMe]

Hello experts,

O.k I give up on this. I have an LDAP query from asp working
correctly. It is returning data fine. Now I need to know how to take
this data and then submitt it into the database. Can this be done in
one page and is there any other way to do this without putting a submit
button on a page. Almost like a file that I can pass to the user and
he can click it to insert into a database. My way of do it is to
simply to put a submit button on the page and when the user hits submit
the values selected will go to the database. However the only thing on
this page is a submit(kinda useless).

This is part of my code

<form name="form1" method="post" action="ldap_second.asp">

<TABLE BORDER = 2>
<TR><TD>Name</TD>
<TD>Mail</TD>
<TD>GivenName</TD>
<TD>Address</TD>
</TR>

<%
Do Until objRecordSet.EOF%>
<%
Dim N
Dim M
Dim GN
N = objRecordset("Name")
M = objRecordset("Mail")
GN = objRecordset("GivenName")
SA = objRecordset("StreetAddress")

response.write "<TR>"
response.write "<TD>" & N & "</TD>"
response.write "<TD>" & M & "</TD>"
response.write "<TD>" & GN & "</TD>"
response.write "<TD>" & SA & "</TD>"
response.write "</TR>"
%>
<%      objRecordSet.MoveNext
Loop
%>
</TABLE>
<p><input type="submit" value="Submit" name="B1</p>

Now on my ldap_second how to I take the values and submit them to a
database. Your help is appreciated.

 

[Mike Brind]

Hello experts,

O.k I give up on this. I have an LDAP query from asp working
correctly. It is returning data fine. Now I need to know how to take
this data and then submitt it into the database. Can this be done in
one page and is there any other way to do this without putting a submit
button on a page. Almost like a file that I can pass to the user and
he can click it to insert into a database. My way of do it is to
simply to put a submit button on the page and when the user hits submit
the values selected will go to the database. However the only thing on
this page is a submit(kinda useless).

This is part of my code

<form name="form1" method="post" action="ldap_second.asp">

<TABLE BORDER = 2>
<TR><TD>Name</TD>
<TD>Mail</TD>
<TD>GivenName</TD>
<TD>Address</TD>
</TR>

<%
Do Until objRecordSet.EOF%>
<%
Dim N
Dim M
Dim GN
N = objRecordset("Name")
M = objRecordset("Mail")
GN = objRecordset("GivenName")
SA = objRecordset("StreetAddress")

response.write "<TR>"
response.write "<TD>" & N & "</TD>"
response.write "<TD>" & M & "</TD>"
response.write "<TD>" & GN & "</TD>"
response.write "<TD>" & SA & "</TD>"
response.write "</TR>"
%>
<%      objRecordSet.MoveNext
Loop
%>
</TABLE>
<p><input type="submit" value="Submit" name="B1</p>

Now on my ldap_second how to I take the values and submit them to a
database. Your help is appreciated.

Well, given that a form requires fields to be of any use (as you alluded to)
why not simply response.write the values into hidden form fields?

 

[MrHelpMe]

Mike thanks for the reply. Anyway you could show me how to do that
with some sample code? Sorry still learning everything

Hello experts,

O.k I give up on this. I have an LDAP query from asp working
correctly. It is returning data fine. Now I need to know how to take
this data and then submitt it into the database. Can this be done in
one page and is there any other way to do this without putting a submit
button on a page. Almost like a file that I can pass to the user and
he can click it to insert into a database. My way of do it is to
simply to put a submit button on the page and when the user hits submit
the values selected will go to the database. However the only thing on
this page is a submit(kinda useless).

This is part of my code

<form name="form1" method="post" action="ldap_second.asp">

<TABLE BORDER = 2>
<TR><TD>Name</TD>
<TD>Mail</TD>
<TD>GivenName</TD>
<TD>Address</TD>
</TR>

<%
Do Until objRecordSet.EOF%>
<%
Dim N
Dim M
Dim GN
N = objRecordset("Name")
M = objRecordset("Mail")
GN = objRecordset("GivenName")
SA = objRecordset("StreetAddress")

response.write "<TR>"
response.write "<TD>" & N & "</TD>"
response.write "<TD>" & M & "</TD>"
response.write "<TD>" & GN & "</TD>"
response.write "<TD>" & SA & "</TD>"
response.write "</TR>"
%>
<%      objRecordSet.MoveNext
Loop
%>
</TABLE>
<p><input type="submit" value="Submit" name="B1</p>

Now on my ldap_second how to I take the values and submit them to a
database. Your help is appreciated.

Well, given that a form requires fields to be of any use (as you alluded to)
why not simply response.write the values into hidden form fields?

 

[Mike Brind]

Do it in the same way as you've written the table out using response.write.

Response.Write "<input type=""hidden""... etc

--
Mike Brind

Mike thanks for the reply. Anyway you could show me how to do that
with some sample code? Sorry still learning everything

Hello experts,

O.k I give up on this. I have an LDAP query from asp working
correctly. It is returning data fine. Now I need to know how to take
this data and then submitt it into the database. Can this be done in
one page and is there any other way to do this without putting a submit
button on a page. Almost like a file that I can pass to the user and
he can click it to insert into a database. My way of do it is to
simply to put a submit button on the page and when the user hits submit
the values selected will go to the database. However the only thing on
this page is a submit(kinda useless).

This is part of my code

<form name="form1" method="post" action="ldap_second.asp">

<TABLE BORDER = 2>
<TR><TD>Name</TD>
<TD>Mail</TD>
<TD>GivenName</TD>
<TD>Address</TD>
</TR>

<%
Do Until objRecordSet.EOF%>
<%
Dim N
Dim M
Dim GN
N = objRecordset("Name")
M = objRecordset("Mail")
GN = objRecordset("GivenName")
SA = objRecordset("StreetAddress")

response.write "<TR>"
response.write "<TD>" & N & "</TD>"
response.write "<TD>" & M & "</TD>"
response.write "<TD>" & GN & "</TD>"
response.write "<TD>" & SA & "</TD>"
response.write "</TR>"
%>
<%      objRecordSet.MoveNext
Loop
%>
</TABLE>
<p><input type="submit" value="Submit" name="B1</p>

Now on my ldap_second how to I take the values and submit them to a
database. Your help is appreciated.

Well, given that a form requires fields to be of any use (as you alluded
to)
why not simply response.write the values into hidden form fields?

 

[MrHelpMe]

Thanks again Mike,

So now I got it working and the hidden variables are being passed over.
The code is as follows:

Dim oConn
Dim sSQL
Dim N
Dim M
Dim GN
Dim SA
Dim objRS

N=Request.Form("Name")
M=Request.Form("Email")
GN=Request.Form("GivenName")
SA=Request.Form("StreetAddress")


Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open ("connection")
'set ObjRS = server.CreateObject ("ADODB.Recordset")

If Request.Form("SubmitButton") = "Submit" Then

Do While Not ObjRS.EOF

sSQL = "INSERT into Tablex (Name, Mail, GName,PostalCode)"
sSQL = sSQL &  "VALUES ('" & N&"', '"& M&"', '" & GN&"', '" &
SA&"')"
oConn.Execute ssql

ObjRS.MoveNext
Loop
ObjRS.close
set ObjRS = nothing
oConn.close
set oConn = nothing
End If
%>

However, now I am receiving error:

Error Type:
ADODB.Recordset (0x800A0E78)
Operation is not allowed when the object is closed.
/activedirectory/ldap_second.asp, line 22

Any ideas? Thanks.

Do it in the same way as you've written the table out using response.write.

Response.Write "<input type=""hidden""... etc

--
Mike Brind

Mike thanks for the reply. Anyway you could show me how to do that
with some sample code? Sorry still learning everything

Hello experts,

O.k I give up on this. I have an LDAP query from asp working
correctly. It is returning data fine. Now I need to know how to take
this data and then submitt it into the database. Can this be done in
one page and is there any other way to do this without putting a submit
button on a page. Almost like a file that I can pass to the user and
he can click it to insert into a database. My way of do it is to
simply to put a submit button on the page and when the user hits submit
the values selected will go to the database. However the only thing on
this page is a submit(kinda useless).

This is part of my code

<form name="form1" method="post" action="ldap_second.asp">

<TABLE BORDER = 2>
<TR><TD>Name</TD>
<TD>Mail</TD>
<TD>GivenName</TD>
<TD>Address</TD>
</TR>

<%
Do Until objRecordSet.EOF%>
<%
Dim N
Dim M
Dim GN
N = objRecordset("Name")
M = objRecordset("Mail")
GN = objRecordset("GivenName")
SA = objRecordset("StreetAddress")

response.write "<TR>"
response.write "<TD>" & N & "</TD>"
response.write "<TD>" & M & "</TD>"
response.write "<TD>" & GN & "</TD>"
response.write "<TD>" & SA & "</TD>"
response.write "</TR>"
%>
<%      objRecordSet.MoveNext
Loop
%>
</TABLE>
<p><input type="submit" value="Submit" name="B1</p>

Now on my ldap_second how to I take the values and submit them to a
database. Your help is appreciated.


Well, given that a form requires fields to be of any use (as you alluded
to)
why not simply response.write the values into hidden form fields?

 

[Larry Bud]

Thanks again Mike,

So now I got it working and the hidden variables are being passed over.
The code is as follows:

Dim oConn
Dim sSQL
Dim N
Dim M
Dim GN
Dim SA
Dim objRS

N=Request.Form("Name")
M=Request.Form("Email")
GN=Request.Form("GivenName")
SA=Request.Form("StreetAddress")


Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open ("connection")
'set ObjRS = server.CreateObject ("ADODB.Recordset")

If Request.Form("SubmitButton") = "Submit" Then

Do While Not ObjRS.EOF

sSQL = "INSERT into Tablex (Name, Mail, GName,PostalCode)"
sSQL = sSQL &  "VALUES ('" & N&"', '"& M&"', '" & GN&"', '" &
SA&"')"
oConn.Execute ssql

ObjRS.MoveNext
Loop
ObjRS.close
set ObjRS = nothing
oConn.close
set oConn = nothing
End If
%>

However, now I am receiving error:

Error Type:
ADODB.Recordset (0x800A0E78)
Operation is not allowed when the object is closed.
/activedirectory/ldap_second.asp, line 22

Any ideas? Thanks.

The insert is a one time deal. There's no reason to be looping through
it, as there's nothing to loop through (it's an INSERT, not a select).

The error is from "Do While Not ObjRS.EOF" because ObjRS has not been
opened.

 

[MrHelpMe]

I see. Thanks Larry for the response.

Thanks again Mike,

So now I got it working and the hidden variables are being passed over.
The code is as follows:

Dim oConn
Dim sSQL
Dim N
Dim M
Dim GN
Dim SA
Dim objRS

N=Request.Form("Name")
M=Request.Form("Email")
GN=Request.Form("GivenName")
SA=Request.Form("StreetAddress")


Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open ("connection")
'set ObjRS = server.CreateObject ("ADODB.Recordset")

If Request.Form("SubmitButton") = "Submit" Then

Do While Not ObjRS.EOF

sSQL = "INSERT into Tablex (Name, Mail, GName,PostalCode)"
sSQL = sSQL &  "VALUES ('" & N&"', '"& M&"', '" & GN&"', '" &
SA&"')"
oConn.Execute ssql

ObjRS.MoveNext
Loop
ObjRS.close
set ObjRS = nothing
oConn.close
set oConn = nothing
End If
%>

However, now I am receiving error:

Error Type:
ADODB.Recordset (0x800A0E78)
Operation is not allowed when the object is closed.
/activedirectory/ldap_second.asp, line 22

Any ideas? Thanks.

The insert is a one time deal. There's no reason to be looping through
it, as there's nothing to loop through (it's an INSERT, not a select).

The error is from "Do While Not ObjRS.EOF" because ObjRS has not been
opened.