500 Error: Page Cannot be displayed

[cmt]

Greetings!

I have an asp page that writes out a URL that points to files on a
network drive.

It has been working fine up until a week ago. I haven't made any
changes to the server or code, so I can't figure out why the script
suddenly stopped working.

I have verified that the files do exist, and that the paths are
correct.

But now, whenever a user clicks on the link, they get a "page cannot be
displayed" error message.

Here is the code that writes out the network path:

<table cellspacing='0' cellpadding='1' border='0' class='menubold'
ID="Table1">
<tr>
<td><%
strQry = "SELECT * FROM INET.dbo.cases WHERE CFworkRequestID = '" &
WRid & "' ORDER BY CFpath "
Set objRs = Server.CreateObject("ADODB.RecordSet")
objRs.Open strQry, GetMSSQLConn(), 1
If Not objRs.EOF And Not objRs.BOF Then %>
<table border="0" cellpadding="2" cellspacing="0"><%
Do While Not objRs.EOF And Not objRs.BOF
path = objRs("CFpath").value
arrayPath = Split(path, "\")
If arrayPath(Ubound(arrayPath)) <"\" Then
filename = arrayPath(Ubound(arrayPath))
Else
filename = arrayPath(Ubound(arrayPath) - 1)
End If
path = Replace(path, "\\LSI-DC\SURV", "")
path = Replace(path, "\\LSI-DC\surv", "")
path = Replace(path, "\\lsi-dc\surv", "")
path = Replace(path, "\", "/")
path = "v-drive/" & path
'path = Server.UrlEncode(path)
%>
<tr>
<td nowrap>
<a href="../<%=path%>" target="new"><img
src="../images/file.gif" border="0"></a>
</td>
<td class='menuplain'><a href="../<%=path%>"
target="new"><%=filename%></a></td>
</tr><%
objRs.MoveNext

Loop %>
</table><%
End If
objRs.Close %>
</td>
</tr>
</table>

When clicked, the script opens up a new page. And here is what is in
the Address bar:

http://www.aaaa.com/v-drive//Open%20...97IN-FINAL.doc

Again, I have not made changes to the server or code in about a year.

It just suddenly stopped working. I've gone over permissions, share
security, etc...but I can find no clues.

Can anyone give me any hints or advice? This is driving me nuts.

Thanks!

[Bob Barrows [MVP]]

cmt wrote:

Greetings!

I have an asp page that writes out a URL that points to files on a
network drive.

It has been working fine up until a week ago. I haven't made any
changes to the server or code, so I can't figure out why the script
suddenly stopped working.

I have verified that the files do exist, and that the paths are
correct.

But now, whenever a user clicks on the link, they get a "page cannot
be displayed" error message.

Here is the code that writes out the network path:

<snip>

>
Can anyone give me any hints or advice? This is driving me nuts.

First step: discover what the real error is:

http://www.aspfaq.com/show.asp?id=2109

--
Microsoft MVP -- ASP/ASP.NET
Please reply to the newsgroup. The email account listed in my From
header is my spam trap, so I don't check it very often. You will get a
quicker response by posting to the newsgroup.

[Kyle Peterson]

read the 1st part
http://www.powerasp.com/content/hint...mmon_sense.asp
"cmt" <ch********@gmail.comwrote in message
news:11**********************@a75g2000cwd.googlegr oups.com...

Greetings!

I have an asp page that writes out a URL that points to files on a
network drive.

It has been working fine up until a week ago. I haven't made any
changes to the server or code, so I can't figure out why the script
suddenly stopped working.

I have verified that the files do exist, and that the paths are
correct.

But now, whenever a user clicks on the link, they get a "page cannot be
displayed" error message.

Here is the code that writes out the network path:

<table cellspacing='0' cellpadding='1' border='0' class='menubold'
ID="Table1">
<tr>
<td><%
strQry = "SELECT * FROM INET.dbo.cases WHERE CFworkRequestID = '" &
WRid & "' ORDER BY CFpath "
Set objRs = Server.CreateObject("ADODB.RecordSet")
objRs.Open strQry, GetMSSQLConn(), 1
If Not objRs.EOF And Not objRs.BOF Then %>
<table border="0" cellpadding="2" cellspacing="0"><%
Do While Not objRs.EOF And Not objRs.BOF
path = objRs("CFpath").value
arrayPath = Split(path, "\")
If arrayPath(Ubound(arrayPath)) <"\" Then
filename = arrayPath(Ubound(arrayPath))
Else
filename = arrayPath(Ubound(arrayPath) - 1)
End If
path = Replace(path, "\\LSI-DC\SURV", "")
path = Replace(path, "\\LSI-DC\surv", "")
path = Replace(path, "\\lsi-dc\surv", "")
path = Replace(path, "\", "/")
path = "v-drive/" & path
'path = Server.UrlEncode(path)
%>
<tr>
<td nowrap>
<a href="../<%=path%>" target="new"><img
src="../images/file.gif" border="0"></a>
</td>
<td class='menuplain'><a href="../<%=path%>"
target="new"><%=filename%></a></td>
</tr><%
objRs.MoveNext

Loop %>
</table><%
End If
objRs.Close %>
</td>
</tr>
</table>

When clicked, the script opens up a new page. And here is what is in
the Address bar:

http://www.aaaa.com/v-drive//Open%20...97IN-FINAL.doc

Again, I have not made changes to the server or code in about a year.

It just suddenly stopped working. I've gone over permissions, share
security, etc...but I can find no clues.

Can anyone give me any hints or advice? This is driving me nuts.

Thanks!