[原创] 在Win2000单机上安装雷傲超级论坛（二）

taotao · 发表于 2003-1-4 17:55:09

不错，试试看

hnlydbyh · 发表于 2003-1-6 15:36:06

[这个贴子最后由hnlydbyh在 2003/01/06 03:53pm 编辑]

他中间有一幅图，填写的路径好象是不对的

小虾皮 · 发表于 2003-1-8 14:39:15

[这个贴子最后由小虾皮在 2003/07/27 05:50pm 第 1 次编辑]

下面引用由hnlydbyh在 2003/01/06 03:36pm 发表的内容：
他中间有一幅图，填写的路径好象是不对的

是的，具体是这副图：

在“设置图片文件 URL 路径”下的链接地址是错误的，应该是 “http://127.0.0.1/non-cgi” ，而不是 “http://127.0.0.1”

小虾皮 · 发表于 2003-1-9 10:26:24

下面引用由juju在 2003/01/01 11:38pm 发表的内容：
我知道怎么办拉

怎么解决的？

老陈 · 发表于 2003-1-9 11:24:37

下面引用由mryantao在 2003/01/06 03:25pm 发表的内容：
我完全是按小虾皮教的方法一步一步做的，其他均成功，就是图片无法显示，求大家帮帮我

在管理中心中初始化一下……

小虾皮 · 发表于 2003-1-25 13:08:31

下面引用由t-virus在 2003/01/24 11:40am 发表的内容：
目录data,help等为不可写，请改变属性为777，如何改？

翻一下这个帖子前面的内容，再参考一下另外的几个帖子。
另，你有固定 IP ，就直接填写你的 ip 不是更好吗？这样别人也可以访问了～！

gtou1161 · 发表于 2003-1-27 23:19:36

厉害！厉害！

gtou1161 · 发表于 2003-2-5 14:43:08

[这个贴子最后由gtou1161在 2003/02/05 02:44pm 编辑]

小龙虾，谢谢你的文章，我按照你说的一步步做了，到
http://www.wwwfox.net/non-cgi/other/jiaocheng/31.jpg
一切OK，但是下面我进不去我的论坛

>> 欢迎您，客人：登录 | 注册 | 忘记密码 | 在线 | 搜索 | 帮助

　　朋友一家论坛
　　错误：论坛还没建立

错误：论坛还没建立
关于论坛还没建立错误的详细原因：
请先在管理区建立分论坛！或者分类信息完全丢失，请坛主到管理区重建论坛主界面！
您是否需要查看帮助文件?
产生论坛还没建立错误的可能原因：
密码错误
用户名错误
您不是注册用户

<< 返回上一页

--------------------------------------------------------------------------------
© 中文版权所有： CGI 编程者之家　版本： LB5000XP v0830
版权所有： CGI 编程者之家　　　　程序编制：山鹰(糊)、花无缺
本论坛言论纯属发表者个人意见，与朋友一家论坛立场无关

是不是我需要去申请一个空间？？？？
我是一只小小小小鸟，很菜的问题，希望有空回答我，谢了！！

安达 · 发表于 2003-2-5 15:59:27

你是改了基本变量设置的那个广告吧，进不去了。是有这个BUG。你将INSTALL。CGI复制到CGI-BIN下，重新安装。然后删除就可以了。

gtou1161 · 发表于 2003-2-5 21:57:26

终于搞好了！！想不到我一个对电脑一窍不通的水龙也能安装自己的论坛了，佩服，谢了！！

罗宾汉 · 发表于 2003-2-12 15:43:03

安装好了也只是自我欣赏，像我这样在局域网内的机器，到现在为止也未解决了如何让外部访问的问题。

ffbi · 发表于 2003-2-12 15:48:02

就是叫你在自己的机器上试验好了，然后再网上可以不用浪费太多的时间去学习啊~~

小虾皮 · 发表于 2003-2-21 13:58:44

下面引用由gtou1161在 2003/02/05 09:57pm 发表的内容：
终于搞好了！！想不到我一个对电脑一窍不通的水龙也能安装自己的论坛了，佩服，谢了！！

祝贺你了，：）

小虾皮 · 发表于 2003-2-21 14:00:45

下面引用由罗宾汉在 2003/02/12 03:43pm 发表的内容：
安装好了也只是自我欣赏，像我这样在局域网内的机器，到现在为止也未解决了如何让外部访问的问题。

呵呵，这个恐怕不好办。
不过，你可以在你的机器上安装一个论坛供局域网内的机器访问，也可以过一把瘾了，：）

wily · 发表于 2003-2-25 11:24:04

LB5000 XP 安装向导
程序编制：山鹰糊参与制作:花无缺
版权所有：CGI 编程者之家
--------------------------------------------------------------------------------
欢迎使用 LB5000 XP 安装向导！
最后一步：
LB5000 XP 安装向导现在建立您的管理员账号。
--------------------------------------------------------------------------------
错误！不能够建立 admin 文件！
请检查目录是否正确： C:/apache/htdocs/cgi-bin/lb5000/

小虾皮 · 发表于 2003-2-26 13:22:47

不好意思，我还没有遇见这样的情况，陈老总和其他朋友是否知道这个？

小虾皮 · 发表于 2003-3-21 10:03:18

这个程序的默认主目录应该是 X:\inetpub\wwwroot\……，你是不是在设置程序主目录时改变了这个路径。
将你的 lb 程序放到以上目录当中再安装一下试试～！

肖天 · 发表于 2003-4-3 12:14:24

哈哈终于，成功了，谢谢

三人行 · 发表于 2003-4-14 13:57:36

谢谢

isny伊浪 · 发表于 2003-5-9 14:48:50

老大，我接照你说的去做了。可出现了这种情况，如下。
#!/usr/bin/perl
#############################################################
# LeoBoard ver.5000 / LB5000 / 雷傲超级论坛 ver.5000
#
# 版权所有: 雷傲工作室(原蓝宝石软件工作室)
#
# 制作人 : 山鹰糊 (Shining Hu)
# 花无缺 (Ifairy Han)
#
# 主页地址: http://www.CGIer.com/ CGI 编程者之家
# http://www.LeoBoard.com/ 雷傲论坛支持主页
# http://www.leoBBS.com/ 本论坛直通车
# http://mail@17do.com/ 大家一起邮
#
# *************************
# LB论坛推荐虚拟主机服务商：
# 联网科技:
# http://www.web263.com
# http://www.sinwe.com
# 全面支持LB所有功能,拥有2年提供LB论坛空间的以及500多个LB用户的经验，可以做的更好
# **************************
#
#############################################################
BEGIN {
$LBPATH = '.';
my $pgm = $0;
$pgm =~s/\\/\//g;
$pgm =~s/^.*\/([^\/]+)$/$1/g;
unless (-e $LBPATH.'/'.$pgm) {
 foreach ($0, $ENV{'SCRIPT_FILENAME'}, $ENV{'PATH_TRANSLATED'}) {
 s!\\!/!g; s/^(.*)\/[^\/]+$/$1/g;
 if (-e $_ . '/' .$pgm) { $LBPATH = $_; last; }
 }
}
unshift (@INC, "$LBPATH");
}
use LBCGI;
use Archive::Tar;
use Cwd;
$query = new LBCGI;
@params = $query->param;
foreach $param(@params) {
$theparam = $query->param($param);
 $theparam =~ s/\@/\\\@/g;
 $theparam =~ s/\'//g;
 $theparam =~ s/\"//g;
 ${$param} = $theparam;
 if ($param ne "action") {
 $printme .= "\$" . "$param = \'$theparam\'\;\n";
 }
}
$stylesheet =<<__end_of_sheet__;
<style>

</style>
__end_of_sheet__
$thisprog = "install.cgi"; $|=1;
$XHTML = 0;
if ($action ne "final_step" || !$action) { print header(-charset=>"gb2312"); print "<head><title>LB5000 XP 安装向导 -- CGI 编程者之家</title></head>$stylesheet<body>"; }
if ($action eq "step_two") {
if (-e "${lbdir}cgi-bin.tar"){
my $cwd = cwd();
 my $tar = Archive::Tar->new();
 unless ($tar->read("${lbdir}cgi-bin.tar", 0)) {
 print qq~<td class='w' align='left' width='60%'>cgi-bin.tar不能读取，请检查是否使用二进制模式上传(一定要这个模式上传这个压缩包)</td></tr>~;
 exit;
 }
 chdir $lbdir;
 unless (-w $lbdir){
 chmod (0777,$lbdir) if ($lbdir !~ m/\/cgi-bin\/$/i);
 opendir (FILE, ".");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
next if (($_ eq ".")||($_ eq ".."));
chmod(0755,"./$_");
 }
 }
 my @files = $tar->list_files();
 $tar->extract(@files, $lbdir);
 chdir $cwd;
 }
 if (-e "${lbdir}non-cgi.tar"){
my $cwd = cwd();
 my $tar = Archive::Tar->new();
 unless ($tar->read("${lbdir}non-cgi.tar", 0)) {
 print qq~<td class='w' align='left' width='60%'>non-cgi.tar不能读取，请检查是否使用二进制模式上传(一定要这个模式上传这个压缩包)</td></tr>~;
 exit;
 }
 mkdir($imagesdir,0777);
 chdir $imagesdir;
 unless (-w $imagesdir){
 chmod (0777,$imagesdir);
 opendir (FILE, ".");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
chmod(0777,"./$_");
 }
}
 my @files = $tar->list_files();
 $tar->extract(@files, $imagesdir);
 chdir $cwd;
 }

$endprint = "1\;\n";
$errorflag = 0;
 $filetomake = "$lbdir" . "data/boardinfo.cgi";
 open(FILE,">$filetomake");
 print FILE "$printme";
print FILE "\$adfoot = '<a href=http://www.leobbs.com/ target=_blank><img src=\$imagesurl/images/banner.gif border=0></a>';\n";
print FILE "\$adscript = '<a href=http://www.leobbs.com/ target=_blank><img src=\$imagesurl/images/banner.gif border=0></a>';\n";
print FILE "\n";
 print FILE $endprint;
 close(FILE);

# &chmodfiles;

 if (-e $filetomake && -w $filetomake) {
 $saved_variables = qq(所有输入的信息已经成功的写入 ${lbdir}data/boardinfo.cgi 文件中。);
 }
 else {
 $saved_variables = qq(对不起，不能够保存信息。 
 请检测您输入的 ${lbdir}data 数据路径是否正确？是不是最后遗漏了除号 '/'？ 
 如果正确，请检查 'data' 目录属性是否设置正确。请返回修改后重新递交表单一次。);
 $errorflag = "1";
 }

 $filetocheck = "$lbdir" . "leoboard.cgi";
 if (-e $filetocheck) {
 $found_cgi = qq(正确);
 }
 else {
 $errorflag = "1"; $found_cgi = qq(错误 - 找不到 $filetocheck，数据路径是不是最后遗漏了除号 '/'？请返回重新输入正确信息。);
 }
opendir (DIRS, "$lbdir");
my @files2 = readdir(DIRS);
closedir (DIRS);
my @memdir = grep(/^members/, @files2);
$memdir=@memdir;
if ($memdir eq 0) {
@memdir = grep(/^MEMBERS/, @files2);
rename("${lbdir}MEMBERS","${lbdir}members");
}
if ($memdir eq 0) {
@memdir = grep(/^Members/, @files2);
rename("${lbdir}Members","${lbdir}members");
}
$memdir = $memdir[0];
if ($memdir eq "members") {
srand;
$x = rand;
$x = int($x * 10000000);
$x =sprintf("%08d",$x);
rename("${lbdir}members","${lbdir}members$x");
$memdir="members$x";
}
opendir (DIRS, "$lbdir");
my @files2 = readdir(DIRS);
closedir (DIRS);
my @memdir = grep(/^members/i, @files2);
$memdir = $memdir[0];
 $dirtocheck = "$lbdir" . "data";
 if (-d "$dirtocheck") {
 $datadir = "找到";
 $makefile = "$lbdir" . "data/test.txt";
 open (TEST, ">$makefile") or $datawritable = "目录 data 为不可写，请改变属性为 777 。";
 print TEST "-";
 close (TEST);
 $datawritable = "属性为可写！" if (!$datawritable);
 unlink "$makefile";
 } else { $errorflag = "1"; $datadir = "没有找到！"; }
 $dirtocheck = "$lbdir" . "help";
 if (-d "$dirtocheck") {
 $helpdir = "找到";
 $makefile = "$lbdir" . "help/test.txt";
 open (TEST, ">$makefile") or $helpwritable = "目录 help 为不可写，请改变属性为 777 。";
 print TEST "-";
 close (TEST);
 $helpwritable = "属性为可写！" if (!$helpwritable);
 unlink "$makefile";
 } else { $helpdir = "没有找到！"; }
 $dirtocheck = "$lbdir" . "$memdir";
 if (-d "$dirtocheck") {
 $membersdir = "找到";
 $makefile = "$lbdir" . "$memdir/test.txt";
 open (TEST, ">$makefile") or $memberswritable = "目录 $memdir 为不可写，请改变属性为 777 。";
 print TEST "-";
 close (TEST);
 $memberswritable = "属性为可写！" if (!$memberswritable);
 unlink "$makefile";
 } else { $errorflag = "1"; $membersdir = "没有找到！"; }
 $dirtocheck = "$lbdir" . "messages";
 if (-d "$dirtocheck") {
 $messagesdir = "找到";
 $makefile = "$lbdir" . "messages/test.txt";
 open (TEST, ">$makefile") or $messageswritable = "目录 messages 为不可写，请改变属性为 777 。";
 print TEST "-";
 close (TEST);
 $messageswritable = "属性为可写！" if (!$messageswritable);
 unlink "$makefile";
 } else { $errorflag = "1"; $messagesdir = "没有找到！"; }

 $filetocheck = "$imagesdir" . "images/logo.gif";
 if (-e $filetocheck) {
 $found_image = qq(正确);
 }
 else {
 $errorflag = "1"; $found_image = qq(错误，请注意路径最后不要遗漏除号 '/'，请点击后退填入正确的信息(是不是你遗漏上传了 images 下的 logo.gif 呢？程序是利用这个文件是否存在来判断你设置是否正确的)。);
 }

 $dirtocheck = "$imagesdir" . "images";
 if (-d "$dirtocheck") { $images_dir = "找到！"; } else { $errorflag = "1"; $images_dir = "没有找到！"; }
 $dirtocheck = "$imagesdir" . "emoticons";
 if (-d "$dirtocheck") { $emoticonsdir = "找到！"; } else { $errorflag = "1"; $emoticonsdir = "没有找到！"; }
 $dirtocheck = "$imagesdir" . "avatars";
 if (-d "$dirtocheck") { $avatarsdir = "找到！"; } else { $errorflag = "1"; $avatarsdir = "没有找到！"; }
 $dirtocheck = "$imagesdir" . "usravatars";
 if (-d "$dirtocheck") {
 $usravatarsdir = "找到！";
 $makefile = "$dirtocheck" . "/test.txt";
 open (TEST, ">$makefile") or $usravatarswritabler = "目录 $dirtocheck 为不可写，请改变属性为 777 。";
 print TEST "-";
 close (TEST);
 $usravatarswritable = "属性为可写！" if (!$usravatarswritable);
 unlink "$makefile";
 } else { $errorflag = "1"; $usravatarsdir = "没有找到！"; }
 $dirtocheck = "$imagesdir" . "usr";
 if (-d "$dirtocheck") {
 $usrdir = "找到！";
 $makefile = "$dirtocheck" . "/test.txt";
 open (TEST, ">$makefile") or $usrwritabler = "目录 $dirtocheck 为不可写，请改变属性为 777 。";
 print TEST "-";
 close (TEST);
 $usrwritabler = "属性为可写！" if (!$usrwritabler);
 unlink "$makefile";
 } else { $errorflag = "1"; $usrdir = "没有找到！"; }
 $dirtocheck = "$imagesdir" . "btg";
 if (-d "$dirtocheck") { $btg = "找到！"; } else { $errorflag = "1"; $btg = "没有找到！"; }
 $dirtocheck = "$imagesdir" . "emot";
 if (-d "$dirtocheck") { $emot = "找到！"; } else { $errorflag = "1"; $emot = "没有找到！"; }
 @progs_to_search = ('admincenter.cgi', 'allnews.cgi', 'announcements.cgi', 'code.cgi', 'forumoptions.cgi', 'forums.cgi', 'help.cgi', 'install.cgi', 'index.html', 'lb.lib.pl', 'lbadmin.lib.pl', 'lbfriend.cgi', 'lbmail.lib.pl', 'leoboard.cgi', 'loginout.cgi', 'mailmembers.cgi', 'massmsg.cgi', 'memberlist.cgi', 'messanger.cgi', 'misc.cgi', 'newposts.cgi', 'news.cgi', 'noreg.cgi', 'pag.cgi', 'poll.cgi', 'post.cgi', 'postings.cgi', 'postjs.cgi', 'printpage.cgi', 'profile.cgi', 'rateit.cgi', 'register.cgi', 'remmail.cgi', 'search.cgi', 'SendMail.pm.pl', 'setbadwords.cgi', 'setforums.cgi', 'setipbans.cgi', 'setmemberbak.cgi', 'setmembers.cgi', 'setmembertitles.cgi', 'setskin.cgi', 'setstyles.cgi', 'settemplate.cgi', 'setvariables.cgi', 'shareforums.cgi', 'team.cgi', 'topic.cgi', 'visitforum.lib.pl', 'whosonline.cgi', 'data/progs.cgi', 'data/styles.cgi');

print qq(

<h1>LB5000 XP 安装向导</h1>
程序编制：<a href="mailto:webmaster\@cgier.com">山鹰糊</a> 参与制作:<a href="mailto:info\@cgier.net">花无缺</a> 
版权所有：<a href="http://www.cgier.com/">CGI 编程者之家</a>
<hr noshade color="#000000">
 

欢迎使用 LB5000 XP 安装向导！
 
第二步： 谢谢您写入信息，下面是尝试安装的结果。 如果您得到了错误信息提示，请确定您已经完整上传了本程序，以及目录属性、位置设定正确。 
<hr noshade color="#000000">

 您键入的安装信息是否正确保存？
 
$saved_variables
 
<hr noshade color="#000000">

 路径预览
 

所有程序(*.cgi)的路径： $lbdir - $found_cgi
 
-- 查找 ${lbdir}data　　　 - $datadir - $datawritable 
-- 查找 ${lbdir}help 　　　- $helpdir - $helpwritable 
-- 查找 ${lbdir}messages 　- $messagesdir - $messageswritable 
-- 查找 ${lbdir}$memdir　　- $membersdir - $memberswritable 
 
 

所有非 CGI 文件(images)的路径： $imagesdir - $found_image
 
-- 查找 ${imagesdir}images　　　- $images_dir 
-- 查找 ${imagesdir}emoticons 　- $emoticonsdir 
-- 查找 ${imagesdir}avatars　　- $avatarsdir 
-- 查找 ${imagesdir}usravatars　- $usravatarsdir - $usravatarswritable 
-- 查找 ${imagesdir}usr　　 - $usrdir - $usrwritabler 
-- 查找 ${imagesdir}btg　　　　- $btg 
-- 查找 ${imagesdir}emot　　　- $emot 
<hr noshade color="#000000">

 URL 预览
 

您输入的图片 URL： $imagesurl
 
 
-- 查找 $imagesurl/images/announce.gif - <img src="$imagesurl/images/announce.gif" border=0> 
-- 查找 $imagesurl/emoticons/smile.gif - <img src="$imagesurl/emoticons/smile.gif" border=0> 
-- 查找 $imagesurl/avatars/noavatar.gif - <img src="$imagesurl/avatars/noavatar.gif" border=0> 
如果您看到的是错误的图片，请检查这个 $imagesurl 路径是否正确，同时也请确定图片文件是否是以 Binary 方式上传的。 
);
if ($errorflag eq "1") { print qq( LB5000 XP 安装向导发现错误，不能够继续。请返回重新填入正确的信息); print "</body></html>"; exit; }

print qq(
<hr noshade color="#000000">

文件合法性检查
 
 

LB5000 XP 安装向导将检查您的所有 CGI 文件是否已上传，并且是以 ASCII 方式上传的
 );
foreach (@progs_to_search) {
 $filetotest = "$lbdir" . "$_";
 if (-e $filetotest) {
 open (TEST, "$filetotest");
 @testfile = <TEST>;
 close (TEST);
 if (grep(/\r/, @testfile) && $^O ne "MSWin32") {
 print "找到 $_ ，但它好像是以 BINARY 方式上传的。请重新以 ASCII 方式上传！ ";
 }
 else { print "找到 $_ - 上传正确！ "; }
 }
 else { print "找不到 $_ ! - 是否上传了？ "; }
 } # end foreach
print qq(
 
 <hr noshade color="#000000">
 
 报告结束
 
 
 
 LB5000 XP 安装向导已经完成报告。如果您发现错误，请返回重新填写信息。
 同时，您也可以使用管理员身份在任何时间重新填写信息。
 
 如果您不确定一些问题，或者出现一些未知的错误，请到 <a href="http://www.cgier.com/">CGI 编程者之家</a> 的论坛中提出！
 报告结束
 
 <hr noshade color="#000000">
 
 下一步做什么？
 
 
 
 如果您是从 LB5000 XP 的早期版本升级的，<a href="admincenter.cgi?action=remove">现在到管理中心界面</a>！
 从安全性上考虑，当你进入管理中心的同时，本安装文件将会被自动删除。 
 当本安装文件存在的时候，管理中心是不能运行的！如果自动删除失败，那么请你自行利用 FTP 来删除这个本程序！
 
 如果你是第一次安装 LB5000 XP，那么请<a href="$thisprog?action=step_three">点击这里进入第三步</a>！
 
 );
 }

elsif ($action eq "step_three") {
print qq(

<h1>LB5000 XP 安装向导</h1>
程序编制：<a href="mailto:webmaster\@cgier.com">山鹰糊</a> 参与制作:<a href="mailto:info\@cgier.net">花无缺</a> 
版权所有：<a href="http://www.cgier.com/">CGI 编程者之家</a>
<hr noshade color="#000000">
 

你是否以前到过这一步？
 

如果您是从 LB5000 XP 的早期版本升级的，<a href="admincenter.cgi?action=remove">现在到管理中心界面</a>！
 如果您运行这一步，您将丢失论坛的所有数据！！！
<hr noshade color="#000000">
 
第三步： 
最后安装部分。这一步将完成论坛的安装，您将能够进入管理中心界面设置论坛风格、颜色等。
 
<hr noshade color="#000000">
 

以管理员身份注册您自己
 

您将以管理员身份注册自己，这样就可以正确访问管理中心界面
 
<form action="$thisprog" method="post">
<input type="hidden" name="action" value="final_step">

输入您的管理员名称：(最大12字符) 
<input type="text" name="membername" maxlength=12>
 
请输入管理员密码： 
<input type="password" name="password_one" maxlength=20>
 
请重输管理员密码： 
<input type="password" name="password_two" maxlength=20>
 
<input type="submit" value="提交这个信息">
</form>
<hr noshade color="#000000">
 
请仔细检查所有信息，并请紧记您的名称、密码。
 );
} # end step 3
elsif ($action eq "final_step") {
$namecookie = cookie(-name => "adminname",
 -value => "$membername");
$passcookie = cookie(-name => "adminpass",
 -value => "$password_one");
print header(-cookie=>[$namecookie, $passcookie],-charset=>"gb2312"); print "<head><title>LB5000 XP 安装向导 -- CGI 编程者之家</title></head>$stylesheet<body>";
print qq(

<h1>LB5000 XP 安装向导</h1>
程序编制：<a href="mailto:webmaster\@cgier.com">山鹰糊</a> 参与制作:<a href="mailto:info\@cgier.net">花无缺</a> 
版权所有：<a href="http://www.cgier.com/">CGI 编程者之家</a>
<hr noshade color="#000000">
 

欢迎使用 LB5000 XP 安装向导！
 
最后一步： 
LB5000 XP 安装向导现在建立您的管理员账号。
 
<hr noshade color="#000000">
 
);
require "${lbdir}data/boardinfo.cgi";
$currenttime = time;
$blanks = "yes" if (!$membername);
$blanks = "yes" if (!$password_one);
$blanks = "yes" if (!$password_two);
if ($blanks) { print qq( 请填写完所有选项，使用后退返回上一步。); print "</body></html>"; exit; }
if ($password_one ne $password_two) { print qq( 输入的两次密码不同，请返回上一步重新输入。); print "</body></html>"; exit; }
if(length($membername)<2) { print qq( 管理员用户名太短了！); print "</body></html>"; exit; }
if($membername =~ /^客人/) { print qq( 管理员用户名不能为客人字样！);print "</body></html>";exit; }
if($membername =~ /_/) { print qq( 请不要在管理员帐号名中使用下划线！); print "</body></html>";exit;}
if($membername =~ /\t/) { print qq( 请不要在管理员帐号名中使用特殊字符！);print "</body></html>";exit; }
if(($password_one =~ /\t/)||($password_two =~ /\t/)) { print qq( 请不要在密码中使用特殊字符！); print "</body></html>";exit;}
if(length($password_one)<6) { print qq( 管理员密码太短了，请更换！密码必须 6 位以上！); print "</body></html>";exit;}
if ($password_one =~ /^[0-9]+$/) { print qq( 管理员密码请不要全部为数字，请更换！); print "</body></html>";exit;}
opendir (DIRS, "$lbdir");
my @files2 = readdir(DIRS);
closedir (DIRS);
my @memdir = grep(/^members/i, @files2);
$memdir = $memdir[0];
$memberfilename = $membername;
$memberfilename =~ y/ /_/;
 $memberfilename =~ tr/A-Z/a-z/;
$membersdir = "$lbdir" . "$memdir";
$filetomake = "$lbdir" . "$memdir/$memberfilename.cgi";
open (ADMIN, ">$filetomake");
print ADMIN "$membername\t$password_one\tmember\tad\t0\t$adminemail_in\tno\t保密\t\t\t\t\t\t$currenttime\t\t";
close (ADMIN);
if (-e $filetomake) {
$filerequire = "$lbdir"."data/boardinfo.cgi";
if (-e $filerequire) {
}else {
print qq(

错误！不能够找到 $filerequire 文件！
 
请检查 data 目录属性是否正确： $lbdir/data );
print "</body></html>"; exit;
}
print qq(

恭喜，您的 LB5000 XP 已经成功安装好了！
 
现在，您可以<a href="admincenter.cgi?action=remove">进入管理中心</a>设置您的论坛。 从安全角度考虑，本自动安装程序将会被自动删除，以免您的论坛受到不安全的威胁！ 
同时我们已经安装了两个论坛附加功能: 
1. LB5000 XP 论坛新新贴子，显示整个论坛的最新贴 ver 1.2 
############################################################################ 
# 使用办法： allnews.cgi&maxlength=标题长度 
# 例：在你主页的适当位置加入以下语句 
# <script src="$boardurl/allnews.cgi&maxlength=20&display=1"></script> 
# 这样就可以在相应位置显示整个论坛的最新贴，标题长度 20，显示发贴时间 
# (display=0 表示不显示发贴时间) 
# 
# 对于显示贴子个数，请在 LB5000 XP 中的管理区设置 
# 所有参数均可以省略 
############################################################################ 
2. LB5000 XP 分论坛新新贴子 ver 1.2 
################################################################################### 
# 使用办法： news.cgi?forum=分论坛号&max=显示几条贴子&maxlength=标题长度&display=1 
# 例：在你主页的适当位置加入以下语句 
# <script src="$boardurl/news.cgi?forum=1&max=10&maxlength=20"></script> 
# 这样就可以在相应位置显示1号论坛的最新10个贴子，标题长度为 20，显示发贴时间 
# (display=0 表示不显示发贴时间) 
# 所有参数均可以省略 
################################################################################### 
3. LB5000 XP 分论坛精华贴子显示 ver 1.2 
################################################################################### 
# 使用办法： newsjh.cgi?forum=分论坛号 
# 例：在你主页的适当位置加入以下语句 
# <script src="newsjh.cgi?forum=1"></script> 
# 这样就可以在相应位置显示1号论坛的最新20个贴子 
################################################################################### 
4. LB5000 XP 公告显示 ver 1.2 
################################################################################### 
# 使用办法： getanc.cgi 
# 例：在你主页的适当位置加入以下语句 
# <script src="getanc.cgi"></script> 
# 这样就可以在相应位置显示论坛的最新公告 
################################################################################### 
 
还有8个附加功能存放在 addon 目录中，是 
1. bm2lb5000.cgi "UBB=>LB5000 XP 用户资料转换器" 
2. ubb2lb5000.cgi "bm=>LB5000 XP 用户数据转换 v0.2" 
3. yuzi2lb5000.cgi "yuzi BBS2000(3000)=>LB5000 XP 用户资料转换器" 
4. ys2lb5000.cgi "一山草堂 BBS=>LB5000 XP 用户资料转换器" 
5. yaBB2LB5000.cgi "YaBB=>LB5000 XP 用户资料转换器" 
6. bbs2lbt.cgi "yuzi BBS3000=>LB5000 XP 贴子资料转换器" 
7. ys2lbt.cgi "一山草堂 BBS=>LB5000 XP 贴子资料转换器" 
8. u2lbt.cgi "UBB=>LB5000 XP 贴子资料转换器" 
);
}
else {
 print qq(

错误！不能够建立 admin 文件！
 
请检查 $memdir 目录是否正确： $membersdir );
print "</body></html>"; exit;
}
 $filetomake = "$lbdir" . "data/boardstats.cgi";



 open(FILE, ">$filetomake");
 print FILE "\$lastregisteredmember = \'$membername\'\;\n";
 print FILE "\$totalmembers = \'1\'\;\n";
 print FILE "\$totalthreads = \'0\'\;\n";
 print FILE "\$totalposts = \'0\'\;\n";
 print FILE "\n1\;";
 close (FILE);
print qq(
 
<hr noshade color="#000000">

感谢你使用 LB5000 XP！
 

我们希望安装向导对您安装本论坛是有帮助的。 
如果您还有其他问题，请参观 <a href="http://www.cgier.com/">CGI 编程者之家</a> 的论坛，本站提供 LB5000 XP 的完全技术支持！
 
);
} # end final step

 else {
eval '$home = (getpwuid($<))[7];';
if (!-e "C:/") { $pwd = `pwd`; chop $pwd; }
if (!eval 'use Cwd;') { eval '$cwd = cwd();'; } else { $cwd = ""; }
$prog = $0;
if ($prog =~ m|install\.(\w+)|) { $prog = "install.$1"; $cgi_extension = $1; }
$b4 = $`;
$b4 =~ s/\/$//;
$b4 =~ s/\\$//;
$document_root = $ENV{'DOCUMENT_ROOT'};
$document_root =~ s/\/$//;
$document_root =~ s/\\$//;
$filename = $ENV{'SCRIPT_FILENAME'};
$filename =~ s/\/$prog//;
$filename =~ s/\\$prog//;
$path = $ENV{'PATH_TRANSLATED'};
$path =~ s/\/$//;
$path =~ s/\\$//;
&check($pwd); &check($b4); &check($home); &check($document_root); &check($filename); &check($path); &check($cwd);
opendir(CURDIR, "..");
while ($q = readdir(CURDIR)) { push (@founddir, $q); }
closedir(CURDIR);
$true_path =~ s%\\%/%g;
$true_path =~ s%//%/%g;
if ($true_path =~ m|(.*)/(.+)|) {
$base = $1;
$cgi = $2;
} else {
$base = $true_path;
$cgi = "cgi-bin";
}
$poss_html_dir = "public_html htdocs";
$unsure_html_dir = "htdoc html www wwwdoc wwwdocs wwwroot httpd doc docs";
@poss = split(/\s/, $poss_html_dir);
@founddir = grep(!/\./, @founddir);
$checker = 0;
foreach $test_dir (@poss) {
if (grep(/^$test_dir$/, @founddir)) {
 $html_dir = "$base/$test_dir/lb5000";
 $checker = 1;
 last;
}
}
if ($checker == 0) {
@poss = split(/\s/, $unsure_html_dir);
foreach $test_dir (@poss) {
 if (grep(/^$test_dir$/, @founddir)) {
 if (-e "$base/$test_dir/index.html" || -e "$base/$test_dir/index.htm" || -e "$base/$test_dir/index.php" || -e "$base/$test_dir/index.php3") {
 $html_dir = "$base/$test_dir/lb5000";
 if (-e "$base/$test_dir/index.html" || -e "$base/$test_dir/index.htm" || -e "$base/$test_dir/index.php" || -e "$base/$test_dir/index.php3") {
 $checker = 2;
 $test_dir_me = $test_dir;
 last;
 } else {
 $checker = 1;
 last;
 }
 } else {
 if (-e "$base/$test_dir/index.html" || -e "$base/$test_dir/index.htm" || -e "$base/$test_dir/index.php" || -e "$base/$test_dir/index.php3") {
 $html_dir = "$base/$test_dir/lb5000";
 $checker = 2;
 $test_dir_me = $test_dir;
 last;
 } else {
 $checker = 1;
 last;
 }
 }
 }
}
}
if ($html_dir eq "") {$html_dir = "$base"; }
$script_dir = "$true_path";
$test_ss = "";
if ($ENV{'SCRIPT_URI'} ne "") {
$test_ss = $ENV{'SCRIPT_URI'};
} elsif ($ENV{'SCRIPT_URL'} ne "") {
$test_ss = $ENV{'SCRIPT_URL'};
} elsif ($ENV{'REQUEST_URI'}) {
$test_ss = $ENV{'REQUEST_URI'};
} elsif ($ENV{'SCRIPT_NAME'} ne "") {
$test_ss = $ENV{'SCRIPT_NAME'};
}
if ($test_ss ne "") {
if ($test_ss =~ m|^http://([^/]+)|) { $test_ss = $'; }
if ($test_ss =~ m|/$prog|) { $test_ss = $`; }
if ($test_ss ne "") { $script_url = "http://$ENV{'HTTP_HOST'}$test_ss"; }
} else {
$script_url = "http://$ENV{'HTTP_HOST'}/$cgi";
}
if ($script_url =~ m|^http://([^/]+)/~([^/]+)/|) { $uinfo = "~" . $2 . "/"; }
$html_url = "http://$ENV{'HTTP_HOST'}/$uinfo" . "lb5000";
#$html_dir =~ s%/%\\%g if $html_dir =~ m|^(\w+):|;
#$script_dir =~ s%/%\\%g if $script_dir =~ m|^(\w+):|;
$bdcgi = "$base/$cgi";
$html_dir =~ s%\\\\%\\%g;
$script_dir =~ s%\\\\%\\%g;
$bdcgi =~ s%\\\\%\\%g;
if (-e "C:/" || $^O eq "MSWin32") { $OS_USED = 'NT'; }
$adminemail_in = "incoming\@yourdomain.com";
$adminemail_out = "outgoing\@yourdomain.com";
$timezone_choice = "<select name=\"timezone\"><option value=\"-23\">- 23<option value=\"-22\">- 22<option value=\"-21\">- 21<option value=\"-20\">- 20<option value=\"-19\">- 19<option value=\"-18\">- 18<option value=\"-17\">- 17<option value=\"-16\">- 16<option value=\"-15\">- 15<option value=\"-14\">- 14<option value=\"-13\">- 13<option value=\"-12\">- 12<option value=\"-11\">- 11<option value=\"-10\">- 10<option value=\"-9\">- 9<option value=\"-8\">- 8<option value=\"-7\">- 7<option value=\"-6\">- 6<option value=\"-5\">- 5<option value=\"-4\">- 4<option value=\"-3\">- 3<option value=\"-2\">- 2<option value=\"-1\">- 1<option value=\"0\" selected>0<option value=\"1\">+ 1<option value=\"2\">+ 2<option value=\"3\">+ 3<option value=\"4\">+ 4<option value=\"5\">+ 5<option value=\"6\">+ 6<option value=\"7\">+ 7<option value=\"8\">+ 8<option value=\"9\">+ 9<option value=\"10\">+ 10<option value=\"11\">+ 11<option value=\"12\">+ 12<option value=\"13\">+ 13<option value=\"14\">+ 14<option value=\"15\">+ 15<option value=\"16\">+ 16<option value=\"17\">+ 17<option value=\"18\">+ 18<option value=\"19\">+ 19<option value=\"20\">+ 20<option value=\"21\">+ 21<option value=\"22\">+ 22<option value=\"23\">+ 23</select>";
$time_is_now = localtime;
$website_url = "http://$ENV{'HTTP_HOST'}";
$mailprogram = &mailprogram; #自动测试 Sendmail 路径
 print qq~
<form action="$thisprog" method="post">
<input type="hidden" name="action" value="step_two">

<h1>LB5000 XP 安装向导</h1>
程序编制：<a href="mailto:webmaster\@cgier.com">山鹰糊</a> 参与制作:<a href="mailto:info\@cgier.net">花无缺</a> 
 版权所有：<a href="http://www.cgier.com/">CGI 编程者之家</a>
<hr noshade color="#000000">
 

欢迎使用 LB5000 XP 安装向导！
 
第一步： 在递交表单前，请仔细查看整个下面的内容指示，并检查自动提供的数据是否正确！ 
当你递交表单后，本安装向导会检测所有你输入的数据，如果数据输入错误，将会有详细的提示！ 
在执行本程序下一步之前，请确定你已经把本程序完整上传，并已经将所有文件的属性设置正确了！ 
下面的所有设置数据都可以在 LB5000 XP 的管理中心中重新设置。为了安全起见，本程序在成功完成设置任务后，将会自毁。
如果你希望重新利用本程序来设置的话，请重新上传运行本程序。 
<hr noshade color="#000000">
 

请选择运行本程序的操作系统平台用于文件加锁 
如果你是 Windows 系列的主机，请千万不要选成 Unix，否则会有意想不到的错误发生！ 
文件加锁可以有效的防止贴子数据丢失等问题，但会影响速度，请自己衡量！ 
 
<select name="OS_USED">
<option value="NT" selected>Windows 系列
<option value="Unix">Unix 系列
<option value="No">不加锁
</select>
 
 
<hr noshade color="#000000">
 

文件路径设置 
下面的默认设置仅仅适用于大部分安装本程序的客户，不是所有的客户都适用。如果有错误，请自行修改成正确的值。 
请仔细检查所有的设置，如果你对这些设置有任何的疑问，请询问你的主机提供商！ 
如果你使用的是 Windows 系列操作系统，请使用除号来代替反斜杠（比如：c:/path/to/lb5000/）！
 设置时请务必在路径的最后加上除号 '/'。
 

设置 *.cgi 脚本的安装路径。 

在这里设置的是安装“路径”，不是 URL，所以它肯定不是 'http://' 开头的。 
这个位置包含了所有 LB5000 XP 中的 *.cgi 文件。
要注意，下列目录程序会自动建立。
<ul>
<li>data
<li>members
<li>messages
<li>help
</ul>
<input type="text" size="70" name="lbdir" value="$script_dir/">

 

设置 image 图像文件的安装路径。 

在这里设置的是安装“路径”，不是 URL，所以它肯定不是 'http://' 开头的。 
这个位置包含了所有 LB5000 XP 中的图像文件。
要注意，下列目录程序会自动建立。
<ul>
<li>images
<li>emoticons
<li>avatars
<li>usravatars
<li>usr
<li>btg
<li>emot
</ul>
请注意，不要在路径的最后加 'images/' ！ 

<input type="text" size="70" name="imagesdir" value="$html_dir/">
 
<hr noshade color="#000000">
 

设置你网站的 URL 路径 
下面的默认设置仅仅适用于大部分安装本程序的客户，不是所有的客户都适用。如果有错误，请自行修改成正确的值。 
请仔细检查所有的设置，如果你对这些设置有任何的疑问，请询问你的主机提供商！ 
请不要在每个 URL 地址结尾加反斜杠 '/' ！
 

设置图片文件 URL 路径。 

这里是 URL 路径。必须以 'http://' 开始。 
这个路径包含了所有的 LB5000 XP 图片。
 
<input type="text" size="70" name="imagesurl" value="$html_url">
 


设置您主页的 URL 地址。 

这里是 URL 路径。必须以 'http://' 开始。 
简单的说，就是你在浏览器上输入的访问你主页的地址。
 
<input type="text" size="70" name="homeurl" value="$website_url">
 

LB5000 XP 的 URL 路径。 

这里是 URL 路径。必须以 'http://' 开始。 
请不要在结尾加 CGI 文件名。这里是目录地址，不是文件地址。
 
<input type="text" size="70" name="boardurl" value="$script_url"> 
<hr noshade color="#000000">
 

个性化图片和表情自动转换 

使用个性化图片，每个用户将拥有有自己特色的头像。 
字符自动转换，会自动将输入的表情字符自动转换成图片形式（如输入 :) 将自动转换成图片形式）。
 
 

你是否使用个性化图片？ 

 
<select name="avatars">
<option value="on" selected>使用
<option value="off">不使用
</select>
 
 

您是否使用表情自动转换？ 

 
<select name="emoticons">
<option value="on" selected>使用
<option value="off">不使用
</select> 
<hr noshade color="#000000">
 

邮件功能 
下面的默认设置仅仅适用于大部分安装本程序的客户，不是所有的客户都适用。如果有错误，请自行修改成正确的值。 
请仔细检查所有的设置，如果你对这些设置有任何的疑问，请询问你的主机提供商！
 
 

您是否希望在论坛上使用邮件功能？ 

 
<select name="emailfunctions">
<option value="off">关闭邮件功能
<option value="on" selected>使用邮件功能
</select>
 

您使用何种邮件发送协议？ 

Unix 类主机请选择 Sendmail，Windows 类主机请选择 SMTP 或者 ESMTP，如果你的主机采用了是 Blat 邮件发送程序，那么请选择 Blat。
 
<select name="emailtype">
<option value="smtp_mail" selected>SMTP
<option value="esmtp_mail">ESMTP
<option value="send_mail">Sendmail
<option value="blat_mail">Blat
</select>
 

Sendmail 路径(只有当你选择了 Sendmail 来发信此项才有效)。 
<input type=text size="60" name="SEND_MAIL" value="$mailprogram">
 
 

SMTP 服务器(只有当你选择了 SMTP 或 ESMTP 来发信，此项才有效)。 
<input type=text size="60" name="SMTP_SERVER" value="localhost">
 
 

SMTP 的端口(只有当你选择了 SMTP 或 ESMTP 来发信此项才有效)。 
<input type=text size="60" name="SMTP_PORT" value="$SMTP_PORT">
 
 

ESMTP 的用户名(只有当你选择了 ESMTP 来发信此项才有效)。 
<input type=text size="60" name="SMTPUSER" value="$SMTPUSER">
 
 

ESMTP 的密码(只有当你选择了 ESMTP 来发信此项才有效)。 
<input type=text size="60" name="SMTPPASS" value="$SMTPPASS">
 
 

您的发送邮件地址。 
<input type=text size="60" name="adminemail_in" value="$adminemail_in">
 
 

您的接收邮件地址。 
<input type=text size="60" name="adminemail_out" value="$adminemail_out">
 
 

您是否希望使用邮件来发送用户在论坛中的密码？ 

如果你发送邮件是有问题的话，那么请务必不要使用这个功能！！
 
<select name="passwordverification">
<option value="no" selected>不要
<option value="yes" >需要
</select> 


有新用户注册是否用邮件通知您？
 
<select name="newusernotify">
<option value="no">不要
<option value="yes" selected>需要
</select> 
<hr noshade color="#000000">
 

您论坛的详细资料 
这里将询问您的 LB5000 XP 论坛的一些详细资料。
 

 

论坛名称 
<input type=text size="60" name="boardname" value="CGI 编程者之家的论坛">
 
 

论坛描述 
<input type=text size="60" name="boarddescription" value="我的 LB5000 XP 论坛，好酷酷 :)">
 

您的版权信息 这里不需要加 '&copy\;'，程序会自动产生。 
&copy\;<input type=text size="58" name="copyrightinfo" value="中文版权所有： <a href=http://www.cgier.com>CGI 编程者之家</a>">
 

您的主页名称 
<input type=text size="60" name="homename" value="CGI 编程者之家">
 

是否采用灌水预防机制？ 

灌水预防机制将控制您的用户在一定的时间内不能重复发贴。避免了一些用户为了升级而进行的灌水。 
但这个功能不会影响论坛的坛主和版主的连续发贴。
 
 
<select name="floodcontrol">
<option value="off">关闭灌水预防机制
<option value="on" selected>打开灌水预防机制
</select>
 

 

用户发言相隔时间(只有当灌水预防机制启动后，此项才有效)。 
<input type=text size="10" name="floodcontrollimit" value="30"> 秒
 
 

服务器时差设置 

您的服务器现在时间是 $time_is_now。如果不正确，请使用下面的表单来改变服务器时差。
 
 
$timezone_choice 小时
 
 

您所在的时区 
<input type=text size="60" name="basetimes" value="北京时间">
 
 

是否使用论坛公告？ 

您可以在论坛公告中发布论坛的重要说明、信息等。
 
 
<select name="announcements">
<option value="no">不用
<option value="yes" selected>使用
</select>
 

查看贴子回复的时候，最新的回复是紧跟主题呢？还是放在最后！ 
 
 <select name="sticky">
 <option value="off" selected>正常顺序，新的放在最后
 <option value="on">紧跟主题，新的放在最上面
 </select>
 

发表贴子、回复贴子后自动转移到？ 
 
<select name="refreshurl">
<option value="0" selected>自动返回当前论坛
<option value="1">自动返回当前贴子
</select>
 


支持上传的附件类型 用,分割 
 
 <input type=text size=40 name="addtype" value="gif,jpg,bmp,zip,png,swf,doc,txt,htm,html">
 

<hr noshade color="#000000">
 

请仔细检查上面您输入的信息 

 

<input type=submit value="OK，进入下一步">
</form>~;
}
print "</body></html>";
exit(0);
sub check { local ($dr) = @_; return 0 if $dr eq ""; if (-e "$dr/$prog") { $true_path = $dr; return 1; } }
sub mailprogram
{
$mailprogram='/usr/sbin/sendmail';
if (!(-e $mailprogram)) {$mailprogram='/usr/bin/sendmail';}
if (!(-e $mailprogram)) {$mailprogram='/bin/sendmail';}
if (!(-e $mailprogram)) {$mailprogram='/lib/sendmail';}
if (!(-e $mailprogram)) {$mailprogram='/usr/slib/sendmail';}
if (!(-e $mailprogram)) {$mailprogram='sendmail';}
if (!(-e $mailprogram)) {$mailprogram='/usr/lib/sendmail';};
if (!(-e $mailprogram)) {$mailprogram='perlmail';};
if (!(-e $mailprogram)) {$mailprogram="没有找到 Sendmail 路径，可能你的主机不支持";};
return $mailprogram;
}
sub chmodfiles {
opendir (FILE, ".");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
next if (($_ eq ".")||($_ eq "..")||$_ eq "install.cgi");
chmod(0755,"./$_") if ($_ !~/forum/isg);
}
chmod(0755,"./forums.cgi");
chmod(0755,"./shareforums.cgi");
chmod(0755,"./forumoptions.cgi");
chmod(0755,"./setforums.cgi");
chmod(0777,"data");
chmod(0777,"help");
chmod(0777,"$memdir");
chmod(0777,"memfav");
chmod(0777,"memfriend");
chmod(0777,"backup");
chmod(0777,"lock");
chmod(0777,"FileCount");
chmod(0777,"forumdata");
chmod(0777,"messages");
chmod(0777,"search");
chmod(0777,"Archive");
chmod(0777,"MIME");
opendir (FILE, "./data");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
chmod(0777,"data/$_");
}
opendir (FILE, "./data/skin");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
chmod(0777,"data/skin/$_");
}
opendir (FILE, "./Archive");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
chmod(0777,"Archive/$_");
}
opendir (FILE, "./URI");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
chmod(0777,"URI/$_");
}
opendir (FILE, "./MIME");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
chmod(0777,"MIME/$_");
}
opendir (FILE, "./messages");
@filename = readdir(FILE);
closedir (FILE);
foreach (@filename) {
chmod(0777,"messages/$_");
}
}

小虾皮 · 发表于 2003-5-12 10:37:39

TO：isny伊浪：
你的这种情况有以下可能：
1.你的解释器没有安装正确，请重新安装；
2.有可能是你的文件属性问题。

xbeon · 发表于 2003-5-20 22:25:17

我出现这样的错误在最后一步的时候,怎么解决??

欢迎使用 LB5000 MX 安装向导！
最后一步：
LB5000 MX 安装向导现在建立您的管理员账号。
--------------------------------------------------------------------------------
Bareword found where operator expected at c:/inetpub/wwwroot/cgi-bin/data/boardinfo.cgi line 25, near "$imagesurl = 'http" (Might be a runaway multi-line '' string starting on line 24) (Missing operator before http?) Number found where operator expected at c:/inetpub/wwwroot/cgi-bin/data/boardinfo.cgi line 25, near "//127.0.0.1" (Missing operator before 127.0.0.1?) Bad name after cgi' at c:/inetpub/wwwroot/cgi-bin/data/boardinfo.cgi line 25. Compilation failed in require at c:\inetpub\wwwroot\cgi-bin\install.cgi line 504.

小虾皮 · 发表于 2003-5-21 13:20:27

重新上传另一版本的论坛程序，重新安装试试。

正版邪神 · 发表于 2003-5-21 22:33:26

我照你写的一步一步做的,可怎么试也出现不了LB5000的安装画面.我检查了几次设置步骤,确实没有错.最后我发现在我的wwwroot目录里面比你的多了两个活动服务器文档.我用Microsoft Frontpage打开出现:
您目前没有为用户设置默认文档。任何尝试连接此站的用户都会收到“正在创建的页”。

欢迎使用 IIS 5.0
Microsoft Windows 2000 的 Internet 信息服务 (IIS) 给 Windows 带来 Web 计算的强大功能。通过 IIS，您可以轻松地共享文件和打印并为安全发布信息创建应用程序来改善您的工作。 IIS 是创建和开发电子商务业解决方案的安全平台。 IIS 也会可以轻松地将任务准则应用程序带给 Web。
含 IIS 的 Windows 2000 可以满足您以下的需要:
设置个人 Web 服务器。
在您的组内共享信息。
访问数据库。
创建一个企业 Intranet。
由于 IIS 的集成是基于 Windows 的 Internet 标准，因此使用 Web 不需要重新学习发布，管理或开发。
含有 Internet 信息服务的 Windows 2000 是在 Web 上共享信息并运行强大的应用程序的最简单的方法。

集成的管理
您可以通过 Windows 2000 计算机管理控制台，或通过脚本来管理 IIS。假如您已经安装了 Windows 2000 服务器或 Windows 2000 高级服务器, 管理 Web 站点管理 Web 站点也可以用来管理 IIS。
如配置多数常用的 IIS 设置一样，您也可以在目录上单击右键，并可以通过 Web 共享其内容。

联机文档
得奖的 IIS 的联机文档包含索引，完整文字搜索，和按节点或单个的主题打印:
获得工作帮助。
学习服务器操作。
参阅参考资料。
查看代码示例。

Web 打印
Windows 2000 在一个易于访问的 Web 站点上动态地列出您的服务器上的所有打印机。您可以浏览该站点监视打印机及其工作情况。您也可以从任何 Windows 计算机通过此站点连接到打印机。
的提示.请问一下是不是这里的毛病?怎么解决?谢谢先~

小虾皮 · 发表于 2003-5-22 21:55:26

[这个贴子最后由小虾皮在 2003/05/26 09:45am 第 1 次编辑]

这个文档是你的操作系统自带的，和你的论坛程序没有关系！删掉也可以。

你的论坛不能出现安装界面的问题，请你再检查你的各个设置和相应支持文件的安装情况，和你提到的这个文件没有关系。

lformat · 发表于 2003-8-10 17:51:45

请 juju 说一下解决的方法好吗？
先谢了

80715512 · 发表于 2003-9-10 15:07:56

哇哇!我成攻了多謝多謝1

Speaking · 发表于 2003-10-10 12:37:04

我在安装时也出现了以下情况：我机子是2000（server）版本
----------------------------------------------------------------------
欢迎使用 LB5000 XP 安装向导！
最后一步：
LB5000 XP 安装向导现在建立您的管理员账号。
--------------------------------------------------------------------------------
错误！不能够建立 admin 文件！
请检查目录是否正确： C:/apache/htdocs/cgi-bin/lb5000/

LB5000 XP 安装向导
程序编制：山鹰糊参与制作:花无缺
版权所有：CGI 编程者之家
--------------------------------------------------------------------------------
欢迎使用 LB5000 XP 安装向导！
最后一步：
LB5000 XP 安装向导现在建立您的管理员账号。
--------------------------------------------------------------------------------
错误！不能够建立 admin 文件！
请检查目录是否正确： C:/apache/htdocs/cgi-bin/lb5000/

小虾皮 · 发表于 2003-10-14 09:06:32

请参看本板块置顶贴和 nctc7 朋友的《关于单机使用lbxp建立论坛的问题的补充》一贴中的有关说明……

darkblue99 · 发表于 2003-11-18 12:42:29

说来说去,你还是不知道怎么让外网访问:(

		自动登录	找回密码
密码			注册

[原创] 在Win2000单机上安装雷傲超级论坛（二）