📄 index.asp
字号:
<p>1、未经作者书面许可，不得衍生出私有软件。<p>
<p>2、不管首页是否以ACTCMS系统生成，网站首页最下面保留清晰可见的支持信息并链接到ACTCMS站，不得以友情链接等方式代替，若网站性质等因素所限，不适合保留支持信息，请和作者签订《ACTCMS 2.0授权合同》<p>
<p>3、您拥有使用本软件构建的网站全部内容所有权，并独立承担与这些内容的相关法律义务。<p>
<p>4、未经官方许可，禁止在 ACTCMS 的整体或任何部分基础上以发展任何派生版本、修改版本或第三方版本用于重新分发<p>
<p>5、您将本软件应用在商业用途时，需遵守以下几条：
<p> 1、使用本软件建设网站时，无需支付使用费用，但需保留ACTCMS支持链接信息。<p>
<p> 2、本源码可以用在商业用途，但不可以更名销售，若有OEM需求，请和作者联系。<p>
<p> 3、若网站性质等因素所限，不适合保留支持信息，请与作者联系取得书面授权。<p>
<p> 4、使用者所生成的网站，首页要包含软件的版权信息；不得对后台版权进行修改。<p>
<p>
<h4><strong>二、有限担保和免责声明</strong></h4>
<p>1、本软件及所附带的文件是作为不提供任何明确的或隐含的赔偿或担保的形式提供的。<p>
<p>2、用户出于自愿而使用本软件，您必须了解使用本软件的风险，在尚未购买产品技术服务之前，我们不承诺提供任何形式的技术支持、使用担保，也不承担任何因使用本软件而产生问题的相关责任。<p>
<p>3、ACTCMS官方不对使用本软件构建的网站中的文章或信息承担责任。<p>
<br>
<p>本协议保留作者的版权信息在许可协议文本之内，不得擅自修改其信息。</p>
<p>2008-3，第1.0版 (ACTCMS官方保留对此许可协议的更新及解释权力)<br />
协议著作权所有 © ACTCMS.com 软件版权所有 © ACTCMS.com</p>
<p>
</td>
</tr>
<tr>
<td>
<div class="readpact boxcenter">
<input name="readpact" type="checkbox" id="readpact" value="" /><label for="readpact"><strong>我已经阅读并同意此协议</strong></label>
</div>
<div class="butbox boxcenter">
<input type="button" class="nextbut" value="" onclick="document.getElementById('readpact').checked ?window.location.href='index.asp?A=2' : alert('您必须同意软件许可协议才能安装！');" />
</div>
</td>
</tr>
</table>
<%End Sub
Public Function AutoDomain()
Dim TempPath
If Request.ServerVariables("SERVER_PORT") = "80" Then
AutoDomain = Request.ServerVariables("SERVER_NAME")
Else
AutoDomain = Request.ServerVariables("SERVER_NAME") & ":" & Request.ServerVariables("SERVER_PORT")
End If
If Instr(UCASE(AutoDomain),"/W3SVC")<>0 Then
AutoDomain=Left(AutoDomain,Instr(AutoDomain,"/W3SVC"))
End If
AutoDomain = "http://" & AutoDomain
End Function
Sub seting()
dim strDir,strAdminDir,InstallDir
strDir=Trim(request.ServerVariables("SCRIPT_NAME"))
strAdminDir=split(strDir,"/")(Ubound(split(strDir,"/"))-1) & "/"
InstallDir=left(strDir,instr(lcase(strDir),"/"&Lcase(strAdminDir)))
If Instr(UCASE(InstallDir),"/W3SVC")<>0 Then
InstallDir=Left(InstallDir,Instr(InstallDir,"/W3SVC"))
End If
%>
<form id="form1" name="form1" method="post" action="index.asp?A=3">
<table width="700" border="0" align="center" cellpadding="0" cellspacing="0" class="twbox">
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td colspan="2" align="center">ACTCMS 2.0正式版-系统安装</td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>网站名称：</strong></td>
<td width="528"><input name="webname" type="text" id="webname" value="我的网站" class="textipt" style="width:150px" /></td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>网站标题：</strong></td>
<td width="528"><input name="webtitle" type="text" id="webtitle" value="我的网站" class="textipt" style="width:150px" /></td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>站长姓名：</strong></td>
<td width="528"><input name="webadmin" type="text" id="webadmin" value="左岸" class="textipt" style="width:150px" /></td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>管理员信箱：</strong></td>
<td><input name="adminmail" type="text" id="adminmail" class="textipt" value="admin@yourmail.com" style="width:150px" /></td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>网站网址：</strong></td>
<td><input name="AutoDomain" type="text" class="textipt" id="AutoDomain" style="width:150px" value="<%=AutoDomain%>" /></td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>CMS安装目录：</strong></td>
<td><input name="InstallDir" type="text" class="textipt" id="InstallDir" style="width:150px" value="<%=InstallDir%>" /></td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>后台目录：</strong></td>
<td><input name="admindir" type="text" class="textipt" id="admindir" style="width:150px" value="admin" />
请确认是否有该文件夹</td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>缓存名称：</strong></td>
<td><input name="webhc" type="text" class="textipt" id="webhc" style="width:150px" value="AcTCMSN" />
系统缓存名称.在一个URL下安装多个ACTCMS请设置不同名称</td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>后台登陆验证码：</strong></td>
<td>
<input Checked id="yzm1" type="radio" name="yzm" value="true">
<label for="yzm1"><font color="green">正常 </font></label>
<input id="yzm2" type="radio" name="yzm" value="false">
<label for="yzm2"><font color="red">关闭 </font></label>
</td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>后台登陆认证码：</strong></td>
<td>
<input Checked id="rzm1" type="radio" name="rzm" value="true" onclick="glrzms.style.display='';" >
<label for="rzm1"><font color="green">正常 </font></label>
<input id="rzm2" type="radio" name="rzm" value="false" onclick="glrzms.style.display='none';">
<label for="rzm2"><font color="red">关闭 </font></label>
</td>
</tr>
<tr id="glrzms" onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>管理认证码：</strong></td>
<td>
<input name="glrzm" type="text" class="textipt" id="glrzm" style="width:150px" value="actcms" />
请修改,这样即使有人知道了后台用户名和密码也不能登录后台</td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>数据库名称：</strong></td>
<td><input name="webdb" type="text" class="textipt" id="webdb" style="width:150px" value="data_act/actcms.mdb" />
不需要加安装目录名称</td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td width="260" align="right"><strong>登录帐号：</strong></td>
<td><input name="loginname" type="text" id="loginname" class="textipt" value="admin" style="width:150px" /></td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td align="right"><strong>登录密码：</strong></td>
<td><input name="password" type="text" id="password" class="textipt" value="admin888" style="width:150px" /></td>
</tr>
<tr onmouseover="overColor(this)" onmouseout="outColor(this)">
<td colspan="2" align="right">
<div class="butbox boxcenter">
<input type="button" class="backbut" value="" onclick="history.back();" style="margin-right:20px" />
<input name="提交" type="submit" class="setupbut" value="" />
</div></td>
</tr>
</table>
</form>
<script language="JavaScript" type="text/javascript">
function overColor(Obj)
{
var elements=Obj.childNodes;
for(var i=0;i<elements.length;i++)
{
elements[i].className="td1"
Obj.bgColor="";
}
}
function outColor(Obj)
{
var elements=Obj.childNodes;
for(var i=0;i<elements.length;i++)
{
elements[i].className="td2";
Obj.bgColor="";
}
}
</script>
<%
End Sub
%>
</body>
</html>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -