HTTP 500 - 內部伺服器錯誤 - Delphi K.Top 討論區

發表時間：2002-08-23 13:52:04

IP:61.59.xxx.xxx 未訂閱

我去下載別人做好的cgi程式~ 我修改了基本資料~也修改了屬性~ 但是他就是會出現HTTP 500 - 內部伺服器錯誤~ 為什麼會這樣ㄋ??? 我的主檔是honey.cgi ↓以下是檔案內容 ================================================================== #!/usr/local/bin/perl ## Honey Board v1.63 (2001/03/05) ## Copyright(C) Kent Web 2001 ## Mail: webmaster@kent-web.com ## Home: http://www.kent-web.com/ $ver = 'Honey v1.63'; #此cgi程式版本 #============# # 設定開始 # #============# #留言板名稱 $title = "星雁ㄟ留言板"; #標題顏色 $t_color = "#DD0000"; #標題字型 $t_face = "標楷體"; #標題文字大小 $t_point = '18pt'; #本文字體大小 $b_size = '10pt'; #主程式名稱 $script = "./honey.cgi"; #留言記錄檔 $logfile = "./honey.log"; #管理密碼 $pass = 'test'; #最大保留篇數(超出的留言會自動刪除) $max = 150; #首頁網址 $home = "http://www.acewake.com/jalina/index"; #圖片放置目錄(可用絕對路徑http://) $imgurl = "./img"; #預設字型 $face = "Arial"; #文字及背景顏色;壁紙 $bgrnd = ""; #壁紙 $bgcol = "#FFFFFF"; #背景顏色 $text = "#779DC1"; #文字顏色 $link = "#6E84B9"; #連結文字顏色(未訪問) $vlink = "#6E84B9"; #連結文字顏色(已訪問) $alink = "#E68A95"; #連結文字顏色(訪問中) $hr_color = "#83AACE"; #分格線顏色 #留言表格顏色設定 $in_color = "#92B9DA"; #框線顏色 $in_bgcolor = "#ffffff"; #表格底色 $tx = "#AFAFAF"; #表格裡文字顏色 #留言編號顏色(No的顏色) $onepnt = "#E37E7E"; #留言主題顏色 $sun_color = "#77A78D"; #留言文字顏色 @colors = ('#93AFD3','#8AA180','#AFAFAF','#A492AD', '#EBA3BB'); #留言框線顏色(1=藍色 2=綠色) $oya_sita = 1; #主留言 $res_sita = 2; #回覆的留言 #信箱是否為必填項目(0=no 1=yes) $in_email = 0; # method形式(POST/GET) $method = 'POST'; #留言更新 method=POST (0=no 1=yes) # -->避免連續送出留言 $MethPost = 0; #同一個IP連續留言間隔時間 # -->可避免連續送出留言 # -->0 為無效之數值 $wait = 3; #html語法使用(0=no 1=yes) $tagkey = 0; #URL自動連結功能(0=no 1=yes) # -->若開放html語法時請選擇no $autolink = 1; #每一頁顯示留言篇數 $p_log = 10; #最新的回覆顯示在最上方(0=no 1=yes) $top_sort = 0; #關數使用(0=no 1=yes) $gethostbyaddr = 0; #(0=no 1=symlink關數 2=open關數) #-->若選擇使用關數則會形成lock檔案 #lock屬性請設成777 $lockkey = 0; #lock檔案名稱 $lockfile = "./honey.lock"; #信件通知 # --> 0 : no # --> 1 : yes 管理者自己的留言也通知 # --> 2 : yes 管理者自己的留言不通知 $mailing = 0; # sendmail發信路徑(若不清楚請詢問網站管理員) $sendmail = '/usr/lib/sendmail'; #管理員信箱 $mailto = 'izr0205@ms65.url.com.tw'; #留言圖檔(名稱需與檔名排列配合) @icon1 = ( '514_01.gif','514_02.gif','514_03.gif','514_04.gif','514_06.gif', '514_07.gif','515_01.gif','515_02.gif','515_03.gif','515_04.gif'); @icon2 = ( '女孩1','女孩2','女孩3','女孩4','女孩5', '女孩6','男孩1','男孩2','男孩3','男孩4'); #管理者專用圖檔 # -->管理者留言時必須填入管理者密碼方可使用管理者專用圖檔 $mgr_icon = "514_05.gif"; #廣告插入位置(FreeWeb) #→ 請選擇你所要放廣告的位置 #→也可以插入MIDI或LimeCounter $banner1 = ''; #上方橫幅廣告 $banner2 = ''; #下方橫幅廣告 #禁止進入的IP或主機名稱 @deny = ( "anonymizer.com", "cache*.*.interlog.com", "", "", "", "", "", "", "" ); #使用圖檔標題 # -->圖檔URL可用http:// $ImgT = "img/tit.gif"; $ImgW = "157"; #圖檔寬度 $ImgH = "31"; #圖檔高度 #計數器 # --> 0=no 1=數字 2=GIF $counter = 1; #計數器位數 $mini_fig = 5; #計數器文字顏色 $cnt_color = "#9873AE"; #計數器圖檔目錄 #目錄名最後必須要用/來結尾 $gif_path = "./img/"; $mini_w = 13; #圖檔寬度 $mini_h = 21; # 圖檔高度 #計數器記錄檔 $cntfile = './count.dat'; #============# # 設定完成 # #============# ################以下新手請勿修改######################## # $imgurl =~ s/\/$//; &decode; &axs_check; if ($mode eq 'regist') { ®ist; } if ($mode eq 'find') { &find; } if ($mode eq 'howto') { &howto; } if ($mode eq 'admin') { &admin; } if ($mode eq 'usrdel') { &usrdel; } if ($mode eq 'image') { ℑ } if ($mode eq 'res') { &res_msg; } &html; #----------------# # 限制進入 # #----------------# sub axs_check { # , 閱r &get_host; local($flag)=0; foreach (@deny) { if (!$_) { next; } $_ =~ s/\*/\.\*/g; if ($host =~ /$_/i) { $flag=1; last; } } if ($flag) { &error("很抱歉!你並未被允許進入!"); } } #----------------# # 留言板主頁 # #----------------# sub html { &header; #計數器位置 if ($counter) { &counter; } print "\n"; #標題 if ($ImgT) { print "< />\><><>$>< />\ href="$script?mode=howto">說明 -搜尋 -管理 EOM # &form_view; #分頁處理 $start = $page 1; $end = $page $p_log; open(IN,"$logfile") || &error("Open Error : $logfile"); $top = ; $i=0; while () { ($no,$reno,$date,$name,$mail,$sub,$icon, $icon2,$com,$color,$url,$host,$pw) = split(/<>/); if ($reno eq "") { $i ; } if ($i < $start) { next; } if ($i > $end) { last; } if ($mail) { $name = "$name"; } if (!$reno && $url) { $url = ""; } target='_blank'>"; } #四個角圖檔大小 $iro = "#ffffff"iro = "#FFFFFF"iro = "#ffffff"iro = "#ffffff" />
\n"; } print "\n"; #留言區內容1 if (!$flag) { print "

\>\><>\>\>\><>\>< >\ >< >\>< >\>"; ><>< >\ >\">< >\>\>\ >\" >\>\><>> "; ><>$> "; >$> "; >回覆] \>$> \><>\><>< >\>< >\><>\>\>< >\>< >\>< >\>\>\><>< >\>\><><>\ >= ><>\>\>\>\><>\>\>\>\>\><>\><>\>\>\>\>\>\>< />\>$>& href='http://www.kent-web.com/' target='_blank'>Honey Board -\n"; print "\n"; print "</body></html>\n"; exit; } #----------------# # 資料寫入處理 # #----------------# sub regist { # POST醆r if ($MethPost && !$post_flag) { &error("sA

thomas0728
中階會員

發表：112
回覆：260
積分：89
註冊：2002-03-12

發送簡訊給我

#2 引用回覆回覆

發表時間：2002-08-29 17:20:12

IP:61.220.xxx.xxx 未訂閱

請先確定iis 是否有設為指令與執行檔其次以下有一段話給你參考 CGI程式還有一些不容易除錯的地方要注意,順便在此和大家分享一下,那就是當一有錯誤時,IE瀏覽器幾乎千篇一律出現"HTTP 500-內部伺服器錯誤"的問題,下列是我遇到的情況: 1.資料庫連線問題: "主機名稱(或IP),資料庫名稱,帳號,密碼"有錯誤 2.伺服器WinNt/System32下少了midas.dll 3.TMidasPageProducer.HTMLFile所指定的網頁路徑錯誤: 這個屬性是動態載入的,通常伺服器的目錄和撰寫程式的工作機台目錄都不太相同,一樣可用INI檔存放伺服器的路徑,讓CGI程式被啟動時,動態將此HTMLFile屬性的目錄換成伺服器的目錄即可. 以上也是別人告訴我,但沒什麼太大幫助就是了不過依我的經驗是你的 iis 設定有問題,你可把你 iis 的設定描述清潔點 Thomas Chiou

------
Thomas Chiou

系統時間：2024-04-20 16:33:40

聯絡我們 | Delphi K.Top討論版

本站聲明

1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！