先说明一下，这个是那个asp文件config.asp的代码：
<%
set lqsm_config= server.CreateObject("lqsm.config")
%>
<br><br><br>
<script language='JavaScript'>
<!--
function check_input()
{
web=document.Web;
if(web.WebHomeDir.value=='')
{
alert('站点主目录不能为空');
web.WebHomeDir.focus();
return false;
}
if(web.MailHomeDir.value=='')
{
alert('邮箱主目录不能为空');
web.MailHomeDir.focus();
return false;
}
if(web.WebIPList.value=='')
{
alert('服务器IP列表不能为空');
web.WebIPList.focus();
return false;
}
}
//-->
</script>
<%
on error resume next
WebHomeDir=request("WebHomeDir")
MailHomeDir=request("MailHomeDir")
WebAction=request("WebAction")
WebIPList=request("WebIPList")
HostID=request("HostID")
RegCode=request("RegCode")
if WebAction="" then
ret = lqsm_config.CfgManage("query",WebHomeDir,MailHomeDir,WebIPList,UserName,UserPass,HostID,RegCode,ErrMsg)
%>
<form name="Web" action="Config.asp" onsubmit='return check_input()'>
<table border=1 bordercolor=#888888 bordercolordark=#ffffff cellpadding=3 cellspacing=0 width=60% class='size09' align='center'>
<tr><td class='color01' bgcolor='#efefef' colspan="2" align="center">请输入系统配置信息</td></tr>
<input name="WebAction" type="Hidden" value="edit">
<tr><td>网站主目录</td><td><input name="WebHomeDir" class="form" type="Text" maxlength="100" size="30" value="<%=WebHomeDir%>"></td></tr>
<tr><td>邮局主目录</td><td><input name="MailHomeDir" class="form" type="Text" maxlength="100" size="30" value="<%=MailHomeDir%>"></td></tr>
<tr><td>服务器IP地址</td><td><input name="WebIPList" class="form" type="Text" maxlength="300" size="30" value="<%=WebIPList%>"> [<font color="#ff0000">有多个IP的用逗号分开</font>]</td></tr>
<tr><td>机器码</td><td><input name="RegCode" class="form" disabled type="Text" maxlength="300" size="50" value="<%=HostID%>"> </td></tr>
<tr><td>注册码</td><td><input name="RegCode" class="form" type="Text" maxlength="300" size="50" value="<%=RegCode%>"> </td></tr>
<tr><td align="center" colspan="2"><input type="Submit" value="修 改" style='text-align:center'> <input type='button' value='返 回' onclick='history.go(-1)' name='button' style='text-align:center'>
</table>
</form>
<%
response.end
end if%>
<%
if WebAction="edit" then
ret = lqsm_config.CfgManage("edit",WebHomeDir,MailHomeDir,WebIPList,UserName,UserPass,HostID,RegCode,ErrMsg)
if ret = 0 and ErrMsg="" then
response.write "<table width='80%' align='center'><tr><td align='center'>系统配置成功</td></tr></table>"
else
response.write "<table width='80%' align='center'><tr><td align='center'>系统配置失败:错误码=["&ret&"],描述=["&ErrMsg&"]</td></tr></table>"
end if
end if
%>
我研究了好半天，输入注册码后那个注册吗不知道存到什么地方去了，用跟踪软件也跟踪不到，请大家帮助了，先些了。
相关的dll组件下载，我已经准备好了，下载地址:
http://www.lgxg.com/dll.rar
[注意]传递专业知识、拓宽行业人脉——看雪讲师团队等你加入！
