Useing a text box to pull from a ddb

M

Michael Handy

hello,
I would like to have a text box pull from a ddb is this possible. I am trying to e-mail the resaults and I know how to use a text box but i cant figure out any other way. her is the script. the mail = request.form("Email") is a text box form the other page but i would like it to pull from the ddb. thanks

<%
DIM strEmail, strName, strComments, mail, reply, objMail
strEmail = request.form("Email")
strName = request.form("FirstName") & vbCrLf & request.form("LastName")
strComments = request.form("Comments")

mail = request.form("Email")
reply = "[email protected]"
Set objMail = Server.CreateObject("CDONTS.NewMail")
objMail.From = reply
objMail.Subject = "Account Info"
objMail.To = mail
objMail.Body = "Email: " & strEmail & vbCrLf & _
"Name: " & strName & vbCrLf & _
"Comments: " & strComments & vbCrLf

objMail.Send
Set objMail = nothing
%><P><%
strName = request.form("Name")
Response.Write strName
%>Thank you, you will receive your account info soon.</P>
 
J

Jim Buyens

-----Original Message-----
hello,
Click to expand...

Howdy.

Your question (below) lacks quite a few details, but
here's some sample code that retrieves information from a
database.

Dim conMyDb
Dim rstQry
Dim strSql
Dim strMyVal
Set cnMyDb = Server.CreateObject("ADODB.Connection")
cnMyDb.Open "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=" & _
Server.MapPath("fpdb/my.mdb") & ";"

strSql = "SELECT * FROM mytable " & _
"WHERE mykey = '" & request("myfield") & "' "
set rstQry = Server.CreateObject("ADODB.Recordset")
rstQry.Open strSql, cnMyDb, 1, 1
if rstQry.eof then
strMyVal = "Key '" & request("myfield") & "' not found."
else
strMyVal = rstQry("myfield")
end if
rstQry.Close
cnMyDb.Close

Of course, you would have to modify the database file
location, the table and field names, the source of the
lookup value, and so forth.

Jim Buyens
Microsoft FrontPage MVP
http://www.interlacken.com
Author of:
*----------------------------------------------------
|\---------------------------------------------------
|| Microsoft Office FrontPage 2003 Inside Out
||---------------------------------------------------
|| Web Database Development Step by Step .NET Edition
|| Microsoft FrontPage Version 2002 Inside Out
|| Faster Smarter Beginning Programming
|| (All from Microsoft Press)
|/---------------------------------------------------
*----------------------------------------------------


I would like to have a text box pull from a ddb is this
Click to expand...
possible. I am trying to e-mail the resaults and I know
how to use a text box but i cant figure out any other way.
her is the script. the mail = request.form("Email") is a
text box form the other page but i would like it to pull
from the ddb. thanks
 
Top