Dynamic List Problem

singh83 · singh83

Hi all,

could someone please help me with a problem I've been trying to resolve for
the last 4 hours?

Basically, I have an ASP page, which inserts a record into a DB using a form.
Within the form I have a list/menu. When the values for the menu are entered in
manually the page works fine. However I have a problem when I setup the menu
dynamically using values from a recordset of a database. I save the page and
test it and it works. However, when I upload the page to my web/application
server and run it using my IE browser it says the page cannot be read.

Any help would be much appreciated.

Thanks,
Sarb.

Nancy Gill · Nancy Gill

How are you setting up the page? Do you have a recordset to get the values
that will go in the list/menu and are you using that with the dynamic
list/menu component?

Can you post your code?

--
Nancy Gill
Team Macromedia Volunteer for Dreamweaver MX/UltraDev
[url]http://www.macromedia.com/go/team/[/url]
Co-Author: Dreamweaver MX: Instant Troubleshooter (August, 2003)
Technical Editor: DMX 2004: The Complete Reference, DMX 2004: A Beginner's
Guide, Mastering Macromedia Contribute
Technical Reviewer: Dynamic Dreamweaver MX/DMX: Advanced PHP Web Development

"singh83" <webforumsuser@macromedia.com> wrote in message
news:d1qhl0$cv1$1@forums.macromedia.com...

> Hi all,
>
> could someone please help me with a problem I've been trying to resolve

for

> the last 4 hours?
>
> Basically, I have an ASP page, which inserts a record into a DB using a

form.

> Within the form I have a list/menu. When the values for the menu are

entered in

> manually the page works fine. However I have a problem when I setup the

menu

> dynamically using values from a recordset of a database. I save the page

and

> test it and it works. However, when I upload the page to my

web/application

> server and run it using my IE browser it says the page cannot be read.
>
> Any help would be much appreciated.
>
> Thanks,
> Sarb.
>

singh83 · singh83

Hi,
the page is mostly setup using dreamweaver's tools, which creates asp and SQL
automatically. Yes, I have created a recordeset containg the data and this is
used with the dynamic list/menu component. When I test the page by pressing F12
(a temp file is created and my testing server is the web server I publish my
files to on the Internet) the list generates perfectly and it works. However,
when I transfer the files directly to my web/application server and try to test
it online it just says Page Cannot Be Displayed.

Here is the code:

<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>


<%
Dim UsersEmails
Dim UsersEmails_numRows

Set UsersEmails = Server.CreateObject("ADODB.Recordset")
UsersEmails.ActiveConnection = MM_RemoteBugDBConn_STRING
UsersEmails.Source = "SELECT * FROM [Bug Tracking User]"
UsersEmails.CursorType = 0
UsersEmails.CursorLocation = 2
UsersEmails.LockType = 1
UsersEmails.Open()

UsersEmails_numRows = 0
%>
<html>
<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>
<form name="form1" method="post" action="">
<table width="800" border="1" align="center" cellpadding="0" cellspacing="0"
bordercolor="#FFFFFF">

<tr>
<td height="36" valign="top" bordercolor="#000000"><img src="logo.JPG"
width="276" height="32"></td>
</tr>
<tr bordercolor="#FFFFFF">
<td height="24" valign="top" bordercolor="#000000"
bgcolor="#F2F2F2"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#ve
rsion=6,0,29,0" width="800" height="24">
<param name="movie" value="Navigation%20Bar_Navigation%20Bar.swf">
<param name="quality" value="high">
<param name="LOOP" value="false">
<embed src="Navigation%20Bar_Navigation%20Bar.swf" width="800"
height="24" loop="false" quality="high"
pluginspage="http://www.macromedia.com/go/getflashplayer"
type="application/x-shockwave-flash"></embed>
</object></td>
</tr>
<tr>
<td height="399" valign="top" bordercolor="#000000"
bgcolor="#FFFFFF"><table width="799" border="0">
<tr>
<td height="102" bordercolor="#FFFFFF"><table width="792" border="0">
<tr>
<td><p> </p>
<p> </p></td>
</tr>
</table>
<table width="791" border="0">
<tr bordercolor="#FFFFFF">
<td width="205" height="26"> <div align="center"><font
face="Arial, Helvetica, sans-serif">Bug Title</font></div></td>
<td width="576"><input name="title" type="text" id="title"
size="80" maxlength="300"></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="33" bordercolor="#FFFFFF"><table width="792" border="0">
<tr>
<td><table width="389" border="0">
<tr>
<td width="202"><div align="center"><font face="Arial,
Helvetica, sans-serif"> Application</font></div></td>
<td width="177"><select name="product" id="product">
<option>SELECT
<option>EAI
<option>Financial Analyser
<option>Heat
<option>iProcurement
<option>Maximo
<option>O.Account
<option>O.Cash
<option>Oracle
<option>P3ec
<option>SIT

</select></td>
</tr>
</table></td>
<td><table width="390" border="0">
<tr>
<td width="210"><div align="center"><font face="Arial,
Helvetica, sans-serif">Operating System</font></div></td>
<td width="170"><select name="operSys" id="operSys">
<option>SELECT
<option>Linux
<option>Windows 2000
<option>Windows XP Home
<option>Windows XP Pro

</select></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td bordercolor="#FFFFFF"><table width="792" border="0">
<tr>
<td><table width="390" border="0">
<tr>
<td width="203"><div align="center"><font face="Arial,
Helvetica, sans-serif">Workstream</font></div></td>
<td width="177"><select name="workstream" id="workstream">
<option>SELECT
<option>Asset Mgt
<option>BWP
<option>Cutover
<option>Finance & Period End
<option>LCMG
<option>People Mgt
<option>Programme Mgt
<option>Project Control
<option>Support
<option>Time Booking
<option>Training

</select></td>
</tr>
</table></td>
<td><table width="392" border="0">
<tr>
<td width="212"><div align="center"><font face="Arial,
Helvetica, sans-serif">Severity</font></div></td>
<td width="170"><select name="severity" id="severity">
<option>SELECT
<option>1
<option>2
<option>3
<option>4
<option>5
</select></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td bordercolor="#FFFFFF"><table width="792" border="0">
<tr>
<td><table width="389" border="0">
<tr>
<td width="203"><div align="center"><font face="Arial,
Helvetica, sans-serif">Reporter</font></div></td>
<td width="176"><select name="reporter" id="reporter">
<option value="">SELECT</option>
<%
While (NOT UsersEmails.EOF)
%>
<option value="<%=(UsersEmails.Fields.Item("Email
Address").Value)%>"><%=(UsersEmails.Fields.Item("E mail
Address").Value)%></option>
<%
UsersEmails.MoveNext()
Wend
If (UsersEmails.CursorType > 0) Then
UsersEmails.MoveFirst
Else
UsersEmails.Requery
End If
%>
</select></td>
</tr>
</table></td>
<td><table width="390" border="0">
<tr>
<td width="213"><div align="center"><font face="Arial,
Helvetica, sans-serif">Assign
Bug to:</font></div></td>
<td width="167"><select name="assign" id="assign">
<option value="">SELECT</option>
<%
While (NOT UsersEmails.EOF)
%>
<option value="<%=(UsersEmails.Fields.Item("Email
Address").Value)%>"><%=(UsersEmails.Fields.Item("E mail
Address").Value)%></option>
<%
UsersEmails.MoveNext()
Wend
If (UsersEmails.CursorType > 0) Then
UsersEmails.MoveFirst
Else
UsersEmails.Requery
End If
%>
</select></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td bordercolor="#FFFFFF"><table width="793" border="0">
<tr>
<td><table width="390" border="0">
<tr>
<td width="203"><div align="center"><font face="Arial,
Helvetica, sans-serif">Cc
Bug to:</font></div></td>
<td width="177"><select name="cc" id="cc">
<option value="">SELECT</option>
<%
While (NOT UsersEmails.EOF)
%>
<option value="<%=(UsersEmails.Fields.Item("Email
Address").Value)%>"><%=(UsersEmails.Fields.Item("E mail
Address").Value)%></option>
<%
UsersEmails.MoveNext()
Wend
If (UsersEmails.CursorType > 0) Then
UsersEmails.MoveFirst
Else
UsersEmails.Requery
End If
%>
</select></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
<tr>
<td bordercolor="#FFFFFF"><table width="793" border="0">
<tr>
<td width="207" height="184" valign="top"><font face="Arial,
Helvetica, sans-serif">Description
of Bug</font></td>
<td width="576"><textarea name="textarea" cols="70"
rows="10"></textarea></td>
</tr>
<tr>
<td height="48" colspan="2" valign="top"><div align="center">
<p>
<input type="submit" name="Submit2" value="Submit">
<input name="Reset" type="reset" id="Reset" value="Reset">
<select name="select">
</select>
</p>
</div></td>
</tr>
</table></td>
</tr>
</table>
</td>
</tr>
<tr>
<td height="67" valign="top" bordercolor="#000000" bgcolor="#F2F2F2"><div
align="center">
<p><font face="Arial, Helvetica, sans-serif"><strong>QUICK
SEARCH</strong></font></p>
<p><font face="Arial, Helvetica, sans-serif"><strong>Enter Bug ID:
<input type="text" name="textfield">
<input type="submit" name="Submit" value="Submit">
</strong></font></p>
</div>
</td>
</tr>
</table>
</form>
<p> </p>
</body>
</html>
<%
UsersEmails.Close()
Set UsersEmails = Nothing
%>
<%
UsersEmails.Close()
Set UsersEmails = Nothing
%>

Many Thanks,

Sarb.

Manuel Socarras · Manuel Socarras

do you have "Show descriptive error" option unchecked in IE? if not, do
it to get a more meaningfull error message

singh83 wrote:

> Hi,
> the page is mostly setup using dreamweaver's tools, which creates asp and SQL
> automatically. Yes, I have created a recordeset containg the data and this is
> used with the dynamic list/menu component. When I test the page by pressing F12
> (a temp file is created and my testing server is the web server I publish my
> files to on the Internet) the list generates perfectly and it works. However,
> when I transfer the files directly to my web/application server and try to test
> it online it just says Page Cannot Be Displayed.
>
> Here is the code:
>
> <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
> 
> 
> <%
> Dim UsersEmails
> Dim UsersEmails_numRows
>
> Set UsersEmails = Server.CreateObject("ADODB.Recordset")
> UsersEmails.ActiveConnection = MM_RemoteBugDBConn_STRING
> UsersEmails.Source = "SELECT * FROM [Bug Tracking User]"
> UsersEmails.CursorType = 0
> UsersEmails.CursorLocation = 2
> UsersEmails.LockType = 1
> UsersEmails.Open()
>
> UsersEmails_numRows = 0
> %>
> <html>
> <head>
> <title>Untitled Document</title>
> <meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
> </head>
>
> <body>
> <form name="form1" method="post" action="">
> <table width="800" border="1" align="center" cellpadding="0" cellspacing="0"
> bordercolor="#FFFFFF">
> 
> <tr>
> <td height="36" valign="top" bordercolor="#000000"><img src="logo.JPG"
> width="276" height="32"></td>
> </tr>
> <tr bordercolor="#FFFFFF">
> <td height="24" valign="top" bordercolor="#000000"
> bgcolor="#F2F2F2"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000"
> codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#ve
> rsion=6,0,29,0" width="800" height="24">
> <param name="movie" value="Navigation%20Bar_Navigation%20Bar.swf">
> <param name="quality" value="high">
> <param name="LOOP" value="false">
> <embed src="Navigation%20Bar_Navigation%20Bar.swf" width="800"
> height="24" loop="false" quality="high"
> pluginspage="http://www.macromedia.com/go/getflashplayer"
> type="application/x-shockwave-flash"></embed>
> </object></td>
> </tr>
> <tr>
> <td height="399" valign="top" bordercolor="#000000"
> bgcolor="#FFFFFF"><table width="799" border="0">
> <tr>
> <td height="102" bordercolor="#FFFFFF"><table width="792" border="0">
> <tr>
> <td><p> </p>
> <p> </p></td>
> </tr>
> </table>
> <table width="791" border="0">
> <tr bordercolor="#FFFFFF">
> <td width="205" height="26"> <div align="center"><font
> face="Arial, Helvetica, sans-serif">Bug Title</font></div></td>
> <td width="576"><input name="title" type="text" id="title"
> size="80" maxlength="300"></td>
> </tr>
> </table>
> </td>
> </tr>
> <tr>
> <td height="33" bordercolor="#FFFFFF"><table width="792" border="0">
> <tr>
> <td><table width="389" border="0">
> <tr>
> <td width="202"><div align="center"><font face="Arial,
> Helvetica, sans-serif"> Application</font></div></td>
> <td width="177"><select name="product" id="product">
> <option>SELECT
> <option>EAI
> <option>Financial Analyser
> <option>Heat
> <option>iProcurement
> <option>Maximo
> <option>O.Account
> <option>O.Cash
> <option>Oracle
> <option>P3ec
> <option>SIT
>
> </select></td>
> </tr>
> </table></td>
> <td><table width="390" border="0">
> <tr>
> <td width="210"><div align="center"><font face="Arial,
> Helvetica, sans-serif">Operating System</font></div></td>
> <td width="170"><select name="operSys" id="operSys">
> <option>SELECT
> <option>Linux
> <option>Windows 2000
> <option>Windows XP Home
> <option>Windows XP Pro
>
> </select></td>
> </tr>
> </table></td>
> </tr>
> </table></td>
> </tr>
> <tr>
> <td bordercolor="#FFFFFF"><table width="792" border="0">
> <tr>
> <td><table width="390" border="0">
> <tr>
> <td width="203"><div align="center"><font face="Arial,
> Helvetica, sans-serif">Workstream</font></div></td>
> <td width="177"><select name="workstream" id="workstream">
> <option>SELECT
> <option>Asset Mgt
> <option>BWP
> <option>Cutover
> <option>Finance & Period End
> <option>LCMG
> <option>People Mgt
> <option>Programme Mgt
> <option>Project Control
> <option>Support
> <option>Time Booking
> <option>Training
>
> </select></td>
> </tr>
> </table></td>
> <td><table width="392" border="0">
> <tr>
> <td width="212"><div align="center"><font face="Arial,
> Helvetica, sans-serif">Severity</font></div></td>
> <td width="170"><select name="severity" id="severity">
> <option>SELECT
> <option>1
> <option>2
> <option>3
> <option>4
> <option>5
> </select></td>
> </tr>
> </table></td>
> </tr>
> </table></td>
> </tr>
> <tr>
> <td bordercolor="#FFFFFF"><table width="792" border="0">
> <tr>
> <td><table width="389" border="0">
> <tr>
> <td width="203"><div align="center"><font face="Arial,
> Helvetica, sans-serif">Reporter</font></div></td>
> <td width="176"><select name="reporter" id="reporter">
> <option value="">SELECT</option>
> <%
> While (NOT UsersEmails.EOF)
> %>
> <option value="<%=(UsersEmails.Fields.Item("Email
> Address").Value)%>"><%=(UsersEmails.Fields.Item("E mail
> Address").Value)%></option>
> <%
> UsersEmails.MoveNext()
> Wend
> If (UsersEmails.CursorType > 0) Then
> UsersEmails.MoveFirst
> Else
> UsersEmails.Requery
> End If
> %>
> </select></td>
> </tr>
> </table></td>
> <td><table width="390" border="0">
> <tr>
> <td width="213"><div align="center"><font face="Arial,
> Helvetica, sans-serif">Assign
> Bug to:</font></div></td>
> <td width="167"><select name="assign" id="assign">
> <option value="">SELECT</option>
> <%
> While (NOT UsersEmails.EOF)
> %>
> <option value="<%=(UsersEmails.Fields.Item("Email
> Address").Value)%>"><%=(UsersEmails.Fields.Item("E mail
> Address").Value)%></option>
> <%
> UsersEmails.MoveNext()
> Wend
> If (UsersEmails.CursorType > 0) Then
> UsersEmails.MoveFirst
> Else
> UsersEmails.Requery
> End If
> %>
> </select></td>
> </tr>
> </table></td>
> </tr>
> </table></td>
> </tr>
> <tr>
> <td bordercolor="#FFFFFF"><table width="793" border="0">
> <tr>
> <td><table width="390" border="0">
> <tr>
> <td width="203"><div align="center"><font face="Arial,
> Helvetica, sans-serif">Cc
> Bug to:</font></div></td>
> <td width="177"><select name="cc" id="cc">
> <option value="">SELECT</option>
> <%
> While (NOT UsersEmails.EOF)
> %>
> <option value="<%=(UsersEmails.Fields.Item("Email
> Address").Value)%>"><%=(UsersEmails.Fields.Item("E mail
> Address").Value)%></option>
> <%
> UsersEmails.MoveNext()
> Wend
> If (UsersEmails.CursorType > 0) Then
> UsersEmails.MoveFirst
> Else
> UsersEmails.Requery
> End If
> %>
> </select></td>
> </tr>
> </table></td>
> </tr>
> </table></td>
> </tr>
> <tr>
> <td bordercolor="#FFFFFF"><table width="793" border="0">
> <tr>
> <td width="207" height="184" valign="top"><font face="Arial,
> Helvetica, sans-serif">Description
> of Bug</font></td>
> <td width="576"><textarea name="textarea" cols="70"
> rows="10"></textarea></td>
> </tr>
> <tr>
> <td height="48" colspan="2" valign="top"><div align="center">
> <p>
> <input type="submit" name="Submit2" value="Submit">
> <input name="Reset" type="reset" id="Reset" value="Reset">
> <select name="select">
> </select>
> </p>
> </div></td>
> </tr>
> </table></td>
> </tr>
> </table>
> </td>
> </tr>
> <tr>
> <td height="67" valign="top" bordercolor="#000000" bgcolor="#F2F2F2"><div
> align="center">
> <p><font face="Arial, Helvetica, sans-serif"><strong>QUICK
> SEARCH</strong></font></p>
> <p><font face="Arial, Helvetica, sans-serif"><strong>Enter Bug ID:
> <input type="text" name="textfield">
> <input type="submit" name="Submit" value="Submit">
> </strong></font></p>
> </div>
> </td>
> </tr>
> </table>
> </form>
> <p> </p>
> </body>
> </html>
> <%
> UsersEmails.Close()
> Set UsersEmails = Nothing
> %>
> <%
> UsersEmails.Close()
> Set UsersEmails = Nothing
> %>
>
>
> Many Thanks,
>
> Sarb.
>

singh83 · singh83

Hi,
im not sure if I have "Show descriptive error" option unchecked in IE. Please
could you tell me how I could check this. However, the exact error message I
get is:
HTTP 500 - Internal server error
Internet Explorer

You can view this at: [url]http://free.7host06.com/tlbugtracker/createbug.asp[/url]

Does this help in identifying the problem?

Thanks,
Sarb.

Manuel Socarras · Manuel Socarras

i'm in a Mac now but i think is in menu:
Tools > Internet options > Advance tab

anyway, the error is:

Microsoft VBScript compilation error '800a0411'

Name redefined

/tlbugtracker/Connections/RemoteBugDBConn.asp, line 8

Dim MM_RemoteBugDBConn_STRING
----^

it could be you have the include directive twice

singh83 wrote:

> Hi,
> im not sure if I have "Show descriptive error" option unchecked in IE. Please
> could you tell me how I could check this. However, the exact error message I
> get is:
> HTTP 500 - Internal server error
> Internet Explorer
>
> You can view this at: [url]http://free.7host06.com/tlbugtracker/createbug.asp[/url]
>
> Does this help in identifying the problem?
>
> Thanks,
> Sarb.
>

singh83 · singh83

thanks! I deleted the duplicate line of code and it now works. Very helpful, thanks!

Dynamic List Problem

Thread Tools

Display

Dynamic List Problem

Similar Questions and Discussions

dynamic list box help

Dynamic text - html list problem

Dynamic list box

Dynamic ASP Drop Down List

Dynamic List Question

Re: Dynamic List Problem

Re: Dynamic List Problem

Re: Dynamic List Problem

Re: Dynamic List Problem

Re: Dynamic List Problem

Re: Dynamic List Problem

Posting Permissions