出来るのだＡＳＰ Ｑ＆Ａ掲示板（過去ＬＯＧ） 　訪問数 52046 昨日 889 今日 776
     【PR】 パソコン入門からIT専門書まで幅広く取り揃えています。セブン-イレブン受取り手数料無料のセブンアンドワイ。
Topに戻る 掲示板に戻る 検索 削除 管理者
500サーバーエラー 　 井上さん [2002/05/27 14:06:17] [2109]
[2109] 500サーバーエラー
投稿者：井上さん 2002/05/27 14:06:17
初めまして。私はまだASPを始めて約2ヶ月の若輩物です。
よろしくご指導願います。

早速本題に入るのですが、とある本のサンプルを表示しようとしたところ、ブラウザに警告の表示が出て、スクリプトを表示しないようにした方がよろしいかと思われますという旨を伝えられ、思わずそれに同意するボタンを押しました。すると自作のASPまでも、PWS経由のものはすべて500サーバー内部エラーというのが表示され、ソースが読まれなくなってしまいました。
ソースは以下の通りです。
同一ディレクトリに存在するファイル名を列挙するものです。

（念のため、デリミタは#に置き換えます。）
<%@ LANGUAGE="VBScript" %>
<html>
<head>
<title>リスト5.1</title>
</head>
<body>
# Set fso = Server.CreateObject("Scripting.FileSystemObject")
rp = Server.MapPath("./")
Set fod = fso.GetFolder(fp)
Set fic = fod.Files
Response.Write "Directory: " & fp & "<br>" & VbCrLf
For Each fil In fic
Response.Write fil.Name & "<br>" & VbCrLf
Next
#
</body>
</html>

使用パソコンはWin98SE、PWSを使用しています。

TreeBBS For ASP V.0.1.3
Program By ＹａｓＮｅｔ