SamirKumar
asked on
drop down list in ASP with DSN-less connection
Hello ASP Experts,
I am trying to create an asp page where users can submit the type of access they are requesting. I am having problems with the access type field cause I need to reach out to a mdb database to populate the drop down. I did some research and tried it myself but the page does not load. My asp page is pasted below and NEED SOME HELP! Thanks and it has to be dsn-less. If you could modify my code or explain how you did it and where my errors are that would be great! Thanks
Samir
-------------------------- ---------- ---------- ---------- --
<html>
<head><title>Add User Page</title>
</head>
<p align="center"><img border = "0" src="\\PAERSCX2101\PRUBC\L OADTEST\Lo ngLogo.gif "width="55 5" height="88"></p>
<p align="center"><b><font face="Verdana" color="#3165CE" size="4">Business Continuation Event Recovery Status</font></b></p>
<p align="center"><b><font face="Times New Roman" color="Black" size="4">Add New User Screen</font></b></p>
<form name="Search" method="Post" action="addtodatabase.asp" >
<TABLE Border = 0 Align = "Center" Width = 40% BGCOLOR = "White">
<tr>
<td align = "right"><b>UserName:</b></ td>
<td><input type="text" name="txtusername" size="20"></td></Tr>
<td align = "right"><b>Password:</b></ td>
<td><input type="text" name="txtPassword" size="20"></td></tr>
<td align = "right"><b>Access Type:</b></td>
<td><select name = "AccessType" size = "1">
<option value=PS>Please Select</OPTION>
<%
strSQL = "SELECT accesslevel FROM tblLoginInfo "
Set cnnLogin = Server.CreateObject("ADODB .Connectio n")
cnnLogin.Open("DRIVER={Mic rosoft Access Driver (*.mdb)};" _
& "DBQ=" & Server.MapPath("login.mdb" ))
Set rstLogin = cnnLogin.Execute(strSQL)
Do While Not rstLogin.EOF
Response.Write "<Option value='" & rstLogin("accesslevel") & "'>" & _
rstLogin("accesslevel") & "</option">
rstLogin.MoveNext
Loop
Response.write "</select>"
rstLogin.Close
Set rstLogin = Nothing
cnnLogin.Close
Set cnnLogin = Nothing
%>
td><Center><input type="submit" VALUE="Login" /></td></Center>
</form>
</table>
</BODY>
</HTML>
I am trying to create an asp page where users can submit the type of access they are requesting. I am having problems with the access type field cause I need to reach out to a mdb database to populate the drop down. I did some research and tried it myself but the page does not load. My asp page is pasted below and NEED SOME HELP! Thanks and it has to be dsn-less. If you could modify my code or explain how you did it and where my errors are that would be great! Thanks
Samir
--------------------------
<html>
<head><title>Add User Page</title>
</head>
<p align="center"><img border = "0" src="\\PAERSCX2101\PRUBC\L
<p align="center"><b><font face="Verdana" color="#3165CE" size="4">Business Continuation Event Recovery Status</font></b></p>
<p align="center"><b><font face="Times New Roman" color="Black" size="4">Add New User Screen</font></b></p>
<form name="Search" method="Post" action="addtodatabase.asp"
<TABLE Border = 0 Align = "Center" Width = 40% BGCOLOR = "White">
<tr>
<td align = "right"><b>UserName:</b></
<td><input type="text" name="txtusername" size="20"></td></Tr>
<td align = "right"><b>Password:</b></
<td><input type="text" name="txtPassword" size="20"></td></tr>
<td align = "right"><b>Access Type:</b></td>
<td><select name = "AccessType" size = "1">
<option value=PS>Please Select</OPTION>
<%
strSQL = "SELECT accesslevel FROM tblLoginInfo "
Set cnnLogin = Server.CreateObject("ADODB
cnnLogin.Open("DRIVER={Mic
& "DBQ=" & Server.MapPath("login.mdb"
Set rstLogin = cnnLogin.Execute(strSQL)
Do While Not rstLogin.EOF
Response.Write "<Option value='" & rstLogin("accesslevel") & "'>" & _
rstLogin("accesslevel") & "</option">
rstLogin.MoveNext
Loop
Response.write "</select>"
rstLogin.Close
Set rstLogin = Nothing
cnnLogin.Close
Set cnnLogin = Nothing
%>
td><Center><input type="submit" VALUE="Login" /></td></Center>
</form>
</table>
</BODY>
</HTML>
can you post your errors, please?
Try this one....
I think how you write the variable coming from the database that causes tha error...
========================
<html>
<head><title>Add User Page</title>
</head>
<p align="center"><img border = "0" src="\\PAERSCX2101\PRUBC\L OADTEST\Lo ngLogo.gif "width="55 5" height="88"></p>
<p align="center"><b><font face="Verdana" color="#3165CE" size="4">Business Continuation Event Recovery Status</font></b></p>
<p align="center"><b><font face="Times New Roman" color="Black" size="4">Add New User Screen</font></b></p>
<form name="Search" method="Post" action="addtodatabase.asp" >
<TABLE Border = 0 Align = "Center" Width = 40% BGCOLOR = "White">
<tr>
<td align = "right"><b>UserName:</b></ td>
<td><input type="text" name="txtusername" size="20"></td></Tr>
<td align = "right"><b>Password:</b></ td>
<td><input type="text" name="txtPassword" size="20"></td></tr>
<td align = "right"><b>Access Type:</b></td>
<td><select name = "AccessType" size = "1">
<option value=PS>Please Select</OPTION>
<%
strSQL = "SELECT accesslevel FROM tblLoginInfo "
Set cnnLogin = Server.CreateObject("ADODB .Connectio n")
cnnLogin.Open("DRIVER={Mic rosoft Access Driver (*.mdb)};" _
& "DBQ=" & Server.MapPath("login.mdb" ))
Set rstLogin = cnnLogin.Execute(strSQL)
Do While Not rstLogin.EOF
%>
<Option value="<%=rstLogin("access level")%>" ><%=rstLog in("access level") %></option>
<% rstLogin.MoveNext
Loop
%>
</select>
<%
rstLogin.Close
Set rstLogin = Nothing
cnnLogin.Close
Set cnnLogin = Nothing
%>
<td><Center>
<input type="submit" VALUE="Login" /></Center></td>
</table>
</form>
</BODY>
</HTML>
========================== ===
Hope this help...
Happy programming....
I think how you write the variable coming from the database that causes tha error...
========================
<html>
<head><title>Add User Page</title>
</head>
<p align="center"><img border = "0" src="\\PAERSCX2101\PRUBC\L
<p align="center"><b><font face="Verdana" color="#3165CE" size="4">Business Continuation Event Recovery Status</font></b></p>
<p align="center"><b><font face="Times New Roman" color="Black" size="4">Add New User Screen</font></b></p>
<form name="Search" method="Post" action="addtodatabase.asp"
<TABLE Border = 0 Align = "Center" Width = 40% BGCOLOR = "White">
<tr>
<td align = "right"><b>UserName:</b></
<td><input type="text" name="txtusername" size="20"></td></Tr>
<td align = "right"><b>Password:</b></
<td><input type="text" name="txtPassword" size="20"></td></tr>
<td align = "right"><b>Access Type:</b></td>
<td><select name = "AccessType" size = "1">
<option value=PS>Please Select</OPTION>
<%
strSQL = "SELECT accesslevel FROM tblLoginInfo "
Set cnnLogin = Server.CreateObject("ADODB
cnnLogin.Open("DRIVER={Mic
& "DBQ=" & Server.MapPath("login.mdb"
Set rstLogin = cnnLogin.Execute(strSQL)
Do While Not rstLogin.EOF
%>
<Option value="<%=rstLogin("access
<% rstLogin.MoveNext
Loop
%>
</select>
<%
rstLogin.Close
Set rstLogin = Nothing
cnnLogin.Close
Set cnnLogin = Nothing
%>
<td><Center>
<input type="submit" VALUE="Login" /></Center></td>
</table>
</form>
</BODY>
</HTML>
==========================
Hope this help...
Happy programming....
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
ASKER
drain,
is the connection able to be used on dsn-less connections?
cause the connection i have worked on another page for me. maybe it is the missing "". i will try tomorrow. but let me know if that connection is dsn-less
the error message i get is that page can not be displayed.
samir
is the connection able to be used on dsn-less connections?
cause the connection i have worked on another page for me. maybe it is the missing "". i will try tomorrow. but let me know if that connection is dsn-less
the error message i get is that page can not be displayed.
samir
SamirKumar,
Have you tried the comment that I have posted... I dont here any acknowledge from you... what is the result?
BTW it is better to write it this way... It is much easier to understand... and avoid confusion as well...
<Option value="<%=rstLogin("access level")%>" ><%=rstLog in("access level") %></option>
Try this link regarding the DSN Less connection
http://www.4guysfromrolla.com/webtech/070399-1.shtml
http://www.able-consulting.com/ADO_Conn.htm
Happy programming...
Good night...
Have you tried the comment that I have posted... I dont here any acknowledge from you... what is the result?
BTW it is better to write it this way... It is much easier to understand... and avoid confusion as well...
<Option value="<%=rstLogin("access
Try this link regarding the DSN Less connection
http://www.4guysfromrolla.com/webtech/070399-1.shtml
http://www.able-consulting.com/ADO_Conn.htm
Happy programming...
Good night...
yeah, the connection string is DSNless as well
SamirKumar,
There is no problem with your connection as I have pointed out.
I think how you write the variable coming from the database on the option tag that causes the error that causes tha error...
Response.Write "<Option value='" & rstLogin("accesslevel") & "'>" & _
rstLogin("accesslevel") & "</option">
especially the end tag
"</option">
should be
"</option>"
Writing this way is to confusing...
I replace it with this
<Option value="<%=rstLogin("access level")%>" ><%=rstLog in("access level") %></option>
Please give some feedback...
HTH...
HAppy programming...
There is no problem with your connection as I have pointed out.
I think how you write the variable coming from the database on the option tag that causes the error that causes tha error...
Response.Write "<Option value='" & rstLogin("accesslevel") & "'>" & _
rstLogin("accesslevel") & "</option">
especially the end tag
"</option">
should be
"</option>"
Writing this way is to confusing...
I replace it with this
<Option value="<%=rstLogin("access
Please give some feedback...
HTH...
HAppy programming...
ASKER
Good job Drain,
My script was perfect...I messed up the "" by option.
Thanks
Samir
My script was perfect...I messed up the "" by option.
Thanks
Samir