⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 act.sys.asp

📁 PDA,若你死昂师傅你说的附件是打开附件上课的附件四度空间就大方快速减肥
💻 ASP
📖 第 1 页 / 共 3 页
字号:
🔍
123 

		  <span class="h" style="cursor:help;"  onclick="Help('ACTSys_zcymb',this)">帮助</span> </td>
      </tr>
    
	  <tr>
        <td width="298" align="right">禁止注册的用户名： </td>
        <td><textarea name="ActCMS_SysSetting16" cols="50" rows="3" id="ActCMS_SysSetting16"><%=ActCMS_SysSetting(16) %></textarea>
            
         <span class="h" style="cursor:help;"  onclick="Help('ACTSys_jzzcymh',this)">帮助</span>  <br>在上边指定的用户名将被禁止注册，每个用户名请用“|”符号分隔</td>
      </tr>
      <tr align="right">
        <td colspan="2" align="center" class="bg_tr">其他信息设置</td>
    </tr>
    <tr>
      <td width="298" align="right">版权信息：</td>
      <td><textarea name="ActCMS_OtherSetting0" cols="50" rows="5"><%=ActCMS_OtherSetting(0)%></textarea>
	  <span class="h" style="cursor:help;"  onclick="Help('ACTSys_bqxx',this)">帮助</span> </td>
    </tr>
    <tr>
      <td width="298" align="right">网站META关键词： </td>
      <td><textarea name="ActCMS_OtherSetting1" cols="50" rows="5"><%=ActCMS_OtherSetting(1)%></textarea>
	  <span class="h" style="cursor:help;"  onclick="Help('ACTSys_metagjz',this)">帮助</span> </td>
    </tr>
    <tr>
      <td width="298" align="right">网站META网页描述： </td>
      <td><textarea name="ActCMS_OtherSetting2" cols="50" rows="5"><%=ActCMS_OtherSetting(2)%></textarea>
	  <span class="h" style="cursor:help;"  onclick="Help('ACTSys_metams',this)">帮助</span> </td>
    </tr>
    <tr>
      <td width="298" align="right">过滤字符：<br></td>
      <td><textarea name="ActCMS_OtherSetting8" cols="50" rows="5"><%=ActCMS_OtherSetting(8)%></textarea>
	  <span class="h" style="cursor:help;"  onclick="Help('ACTSys_glzf',this)">帮助</span> 
      用户名用“|”符号分隔</td>
    </tr>
    <tr>
      <td width="298" align="right">SMTP服务器地址: </td>
      <td><input name="ActCMS_OtherSetting3" type="text" value="<%=ActCMS_OtherSetting(3)%>" size="18">
      <span class="h" style="cursor:help;"  onclick="Help('ACTSys_smtpdz',this)">帮助</span> 
	  用来发送邮件的SMTP服务器如果你不清楚此参数含义，请联系你的空间商</td>
    </tr>
    <tr>
      <td width="298" align="right">SMTP登录用户名： </td>
      <td><input name="ActCMS_OtherSetting4" type="text" value="<%=ActCMS_OtherSetting(4)%>" size="18">
      <span class="h" style="cursor:help;"  onclick="Help('ACTSys_smtpdlm',this)">帮助</span> 当你的服务器需要SMTP身份验证时还需设置此参数</td>
    </tr>
    <tr>
      <td width="298" align="right">SMTP登录密码：</td>
      <td><input name="ActCMS_OtherSetting5" type="PassWord" value="<%=ActCMS_OtherSetting(5)%>" size="20">
        <span class="h" style="cursor:help;"  onclick="Help('ACTSys_smtpmm',this)">帮助</span> 当你的服务器需要SMTP身份验证时还需设置此参数</td>
    </tr>
    <tr>
      <td width="298" align="right">远程图片保存目录：</td>
      <td><input name="ActCMS_OtherSetting6" type="text" id="ActCMS_OtherSetting6" value="<%=ActCMS_OtherSetting(6)%>" size="18">
	  <span class="h" style="cursor:help;"  onclick="Help('ACTSys_yctp',this)">帮助</span> </td>
    </tr>
    <tr>
      <td width="298" align="right">是否以日期保存：</td>
      <td><input <% IF ActCMS_OtherSetting(7) = "0" Then Response.Write "Checked" %>  type="radio"  id="ActCMS_OtherSetting7" name="ActCMS_OtherSetting7" value="0"><label for="ActCMS_OtherSetting7">是 &nbsp;</label>
          <input  <% IF ActCMS_OtherSetting(7) = "1" Then Response.Write "Checked" %>  id="ActCMS_OtherSetting7)2" type="radio" name="ActCMS_OtherSetting7" value="1"><label for="ActCMS_OtherSetting7)2">否 &nbsp;</label>
		  <span class="h" style="cursor:help;"  onclick="Help('ACTSys_rqbc',this)">帮助</span> </td>
    </tr>
    <tr align="right">
      <td colspan="2" align="center"  class="bg_tr">缩略图水印设置</td>
    </tr>
 <% 	
with response
 		.Write "    <tr class=""tdbg"">"
			.Write "      <td width=""257"" height=""40"" align=""right"" class='td_bg'><STRONG>生成缩略图组件：</STRONG><BR>"
			.Write "      <span class=""STYLE1"">请一定要选择服务器上已安装的组件</span></td>"
			.Write "      <td width=""677"">"
			.Write "       <select name=""ActCMS_WatermarkSetting0"" onChange=""ShowThumbInfo(this.value)"" style=""width:50%"">"
			.Write "          <option value=0 "
			If ActCMS_WatermarkSetting(0) = "0" Then .Write ("selected")
			.Write ">关闭 </option>"
			.Write "          <option value=1 "
			If ActCMS_WatermarkSetting(0) = "1" Then .Write ("selected")
			.Write ">AspJpeg组件 " & ACTCMS.ExpiredStr(0) & "</option>"
			.Write "          <option value=2 "
			If ActCMS_WatermarkSetting(0) = "2" Then .Write ("selected")
			.Write ">wsImage组件 " & ACTCMS.ExpiredStr(1) & "</option>"
			.Write "          <option value=3 "
			If ActCMS_WatermarkSetting(0) = "3" Then .Write ("selected")
			.Write ">SA-ImgWriter组件 " & ACTCMS.ExpiredStr(2) & "</option>"
			.Write "        </select>"
			.Write "      <span id=""ThumbComponentInfo""></span></td>"
			.Write "    </tr>"
			.Write "    <tr  class=""tdbg""  id=""ThumbSettingArea"" style=""display:none"">"
			 .Write "     <td height=""23"" align=""right"" class='td_bg'> <input type=""radio"" name=""ActCMS_WatermarkSetting1"" value=""1"" onClick=""ShowThumbSetting(1);"" "
			 If ActCMS_WatermarkSetting(1) = "1" Then .Write ("checked")
			 .Write ">"
			 .Write "       按比例"
			 .Write "       <input type=""radio"" name=""ActCMS_WatermarkSetting1"" value=""0"" onClick=""ShowThumbSetting(0);"" "
			 If ActCMS_WatermarkSetting(1) = "0" Then .Write ("checked")
			 .Write ">"
			 .Write "     按大小 </td>"
			 .Write "     <td width=""677"" height=""50""> <div id =""ThumbSetting0"" style=""display:none"">&nbsp;缩略图宽度："
			.Write "          <input type=""text"" name=""ActCMS_WatermarkSetting2"" size=10 value=""" & ActCMS_WatermarkSetting(2) & """>"
			.Write "          象素<br>&nbsp;缩略图高度："
			.Write "          <input type=""text"" name=""ActCMS_WatermarkSetting3"" size=10 value=""" & ActCMS_WatermarkSetting(3) & """>"
			.Write "          象素</div>"
			.Write "        <div id =""ThumbSetting1"" style=""display:none"">&nbsp;比例："
			.Write "          <input type=""text"" name=""ActCMS_WatermarkSetting4"" size=10 value="""
			If Left(ActCMS_WatermarkSetting(4), 1) = "." Then .Write ("0" & ActCMS_WatermarkSetting(4)) Else .Write (ActCMS_WatermarkSetting(4))
			.Write """>"
			.Write "      <br>&nbsp;如缩小原图的50%,请输入0.5 </div></td>"
			.Write "    </tr>"
			.Write "    <tr  class=""tdbg"" >"
			.Write "      <td height=""40"" align=""right"" class='td_bg'><strong>图片水印组件：</strong><BR>"
			.Write "      <span class=""STYLE1"">请一定要选择服务器上已安装的组件</span></td>"
			.Write "      <td width=""677""> <select name=""ActCMS_WatermarkSetting5"" onChange=""ShowInfo(this.value)"" style=""width:50%"">"
			.Write "          <option value=0 "
			If ActCMS_WatermarkSetting(5) = "0" Then .Write ("selected")
			.Write ">关闭"
			.Write "          <option value=1 "
			If ActCMS_WatermarkSetting(5) = "1" Then .Write ("selected")
			.Write ">AspJpeg组件 " & ACTCMS.ExpiredStr(0) & "</option>"
			.Write "          <option value=2 "
			If ActCMS_WatermarkSetting(5) = "2" Then .Write ("selected")
			.Write ">wsImage组件 " & ACTCMS.ExpiredStr(1) & "</option>"
			.Write "          <option value=3 "
			If ActCMS_WatermarkSetting(5) = "3" Then .Write ("selected")
			.Write ">SA-ImgWriter组件 " & ACTCMS.ExpiredStr(2) & "</option>"
			.Write "      </select>  </td>"
			.Write "    </tr>"
			.Write "    <tr align=""left"" valign=""top""  class=""tdbg""  id=""ActCMS_WatermarkSetting"" style=""display:none"" cellpadding=""0"" cellspacing=""0"">"
			.Write "      <td colspan=2> <table width=100% border=""0"" cellpadding=""0"" cellspacing=""1""  bordercolor=""e6e6e6"" bgcolor=""#efefef"">"
			.Write "          <tr class=""tdbg"">"
			.Write "            <td width=250 height=""26"" align=""right"" class='td_bg'>水印类型</td>"
			.Write "            <td width=""648""> <SELECT name=""ActCMS_WatermarkSetting6"" onChange=""SetTypeArea(this.value)"">"
			.Write "                <OPTION value=""1"" "
			If ActCMS_WatermarkSetting(6) = "1" Then .Write ("selected")
			.Write ">文字效果</OPTION>"
			.Write "                <OPTION value=""2"" "
			If ActCMS_WatermarkSetting(6) = "2" Then .Write ("selected")
			.Write ">图片效果</OPTION>"
			.Write "            </SELECT> </td>"
			.Write "          </tr>"
			.Write "          <tr  class=""tdbg"" >"
			.Write "            <td height=""26"" align=""right"" class='td_bg'>坐标起点位置</td>"
			.Write "            <td> <SELECT NAME=""ActCMS_WatermarkSetting7"">"
			.Write "                <option value=""1"" "
			If ActCMS_WatermarkSetting(7) = "1" Then .Write ("selected")
			.Write ">左上</option>"
			.Write "                <option value=""2"" "
			If ActCMS_WatermarkSetting(7) = "2" Then .Write ("selected")
			.Write ">左下</option>"
			.Write "                <option value=""3"" "
			If ActCMS_WatermarkSetting(7) = "3" Then .Write ("selected")
			.Write ">居中</option>"
			.Write "                <option value=""4"" "
			If ActCMS_WatermarkSetting(7) = "4" Then .Write ("selected")
			.Write ">右上</option>"
			.Write "                <option value=""5"" "
			If ActCMS_WatermarkSetting(7) = "5" Then .Write ("selected")
			.Write ">右下</option>"
			.Write "            </SELECT> </td>"
			.Write "          </tr>"
			.Write "          <tr class=""tdbg"" >"
			.Write "           <td colspan=""2"">"
			.Write "           <table width=""100%"" border=""0"" cellpadding=""0"" cellspacing=""1"" id=""wordarea"">"
			.Write "          <tr  class=""tdbg"" >"
			.Write "            <td width=""27%"" height=""26"" align=""right"" class='td_bg'>水印文字信息:</td>"
			.Write "            <td width=""70%""> <INPUT TYPE=""text"" NAME=""ActCMS_WatermarkSetting8"" size=40 value=""" & ActCMS_WatermarkSetting(8) & """>            </td>"
			.Write "          </tr>"
			.Write "          <tr  class=""tdbg"" >"
			.Write "            <td height=""26"" align=""right"" class='td_bg'>字体大小:</td>"
			.Write "            <td> <INPUT TYPE=""text"" NAME=""ActCMS_WatermarkSetting9"" size=10 value=""" & ActCMS_WatermarkSetting(9) & """>"
			.Write "            <b>px</b> </td>"
			.Write "          </tr>"
			.Write "          <tr  class=""tdbg"" >"
			.Write "            <td height=""26"" align=""right"" class='td_bg'>字体颜色:</td>"
			.Write "            <td><input  type=""text"" name=""ActCMS_WatermarkSetting10"" maxlength = 7 size = 7 value=""" & ActCMS_WatermarkSetting(10) & """ >"
			
			.Write " <img border=0 id=""MarkFontColorShow"" src=""images/rect.gif"" style=""cursor:pointer;background-Color:" & ActCMS_WatermarkSetting(10) & ";"" onClick=""Getcolor(this,'Include/selectcolor.asp','ActCMS_WatermarkSetting10');"" title=""选取颜色""></td>"
			.Write "          </tr>"
			.Write "          <tr  class=""tdbg"" >"
			.Write "            <td height=""26"" align=""right"" class='td_bg'>字体名称:</td>"
			.Write "            <td> <SELECT name=""ActCMS_WatermarkSetting11"">"
			.Write "                <option value=""宋体"" "
			If ActCMS_WatermarkSetting(11) = "宋体" Then .Write ("selected")
			.Write ">宋体</option>"
			.Write "                <option value=""楷体_GB2312"" "
			If ActCMS_WatermarkSetting(11) = "楷体_GB2312" Then .Write ("selected")
			.Write ">楷体</option>"
			.Write "                <option value=""新宋体"" "
			If ActCMS_WatermarkSetting(11) = "新宋体" Then .Write ("selected")
			.Write ">新宋体</option>"
			.Write "                <option value=""黑体"" "
			If ActCMS_WatermarkSetting(11) = "黑体" Then .Write ("selected")
			.Write ">黑体</option>"
			.Write "                <option value=""隶书"" "
			If ActCMS_WatermarkSetting(11) = "隶书" Then .Write ("selected")
			.Write ">隶书</option>"
			.Write "                <OPTION value=""Andale Mono"" "
			If ActCMS_WatermarkSetting(11) = "Andale Mono" Then .Write ("selected")
			.Write ">Andale"
			.Write "                Mono</OPTION>"
			.Write "                <OPTION value=""Arial"" "
			If ActCMS_WatermarkSetting(11) = "Arial" Then .Write ("selected")
			.Write ">Arial</OPTION>"
			.Write "                <OPTION value=""Arial Black"" "
			If ActCMS_WatermarkSetting(11) = "Arial Black" Then .Write ("selected")
			.Write ">Arial"
			.Write "                Black</OPTION>"
			.Write "                <OPTION value=""Book Antiqua"" "
			If ActCMS_WatermarkSetting(11) = "Book Antiqua" Then .Write ("selected")
			.Write ">Book"
			.Write "                Antiqua</OPTION>"
			.Write "                <OPTION value=""Century Gothic"" "
			If ActCMS_WatermarkSetting(11) = "Century Gothic" Then .Write ("selected")
			.Write ">Century"
			.Write "                Gothic</OPTION>"
			.Write "                <OPTION value=""Comic Sans MS"" "
			If ActCMS_WatermarkSetting(11) = "Comic Sans MS" Then .Write ("selected")
			.Write ">Comic"
			.Write "                Sans MS</OPTION>"
123

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -