📄 admin_itemmodify5.asp
字号:
<textarea name="GJTH3sStr" cols="25" rows="5" class="form"><%=GJTH3sStr%></textarea>
<textarea name="GJTH3oStr" cols="25" rows="5" class="form"><%=GJTH3oStr%></textarea></td>
<td align="center" class="alt1" width="25%">替换内容：<br>
<textarea name="GJTH3cStr" cols="35" rows="5" class="form"><%=GJTH3cStr%></textarea>
</td>
</tr>
<tr>
<td colspan=4 align="center" class="alt3">
<input name="ItemID" type="hidden" value="<%=ItemID%>">
<input name="readType" type="hidden" value="<%=readType%>">
<input name="readType1" type="hidden" value="<%=readType1%>">
<input type="hidden" name="UrlTest" value="<%=UrlTest%>">
<input type="button" name="button1" value="上 一 步" onclick="window.location.href='javascript:history.go(-1)'" class="button">
<input type="submit" name="Submit" value="下 一 步" class="button"></td>
</tr>
</form>
</table>
<%elseif readType1=1 then%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tborder" style="LINE-HEIGHT: 150%">
<tr align="center">
<td colspan="2" align="center" class="thead">项 目 管 理--章 节 采 样 测 试</font></td>
</tr>
</table>
<%For Testi=0 To Ubound(TitleArray)%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="border" style="LINE-HEIGHT: 150%">
<tr align="center" class="tdbg">
<td height="40" colspan="2" valign="bottom"><span lang="zh-cn">
<font size="5"><%=TitleArray(Testi)%></span></font></td>
</tr>
<tr align="center" class="tdbg">
<td colspan="2">分卷名称：<%=cookTest%></td>
</tr>
<tr class="tdbg">
<td colspan="2">
<table width="100%" height="100%" border="0" cellpadding="0" cellspacing="5">
<tr>
<td height="200" valign="top">
<p><span lang="zh-cn"><%=ContentArray(Testi)%></span></p>
<br>
</td>
</tr>
</table>
</td>
</tr>
</table>
<br>
<%Next%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tborder" style="LINE-HEIGHT: 150%">
<form method="post" action="Admin_ItemAttribute.asp" name="form2">
<tr>
<td colspan=4 align="center" class="thead">项 目 编 辑--章 节 页 设 置</td>
</tr>
<tr>
<td width="50%" align="right" class=alt2><font color="blue">章节内容简单替换：</font></td>
<td width=50% colspan=3 class=alt1>
<input type="radio" value="1" name="JDTHType1" <%if JDTHType1=1 then response.write "checked"%> class="form" onclick="JDTH1.style.display=''"><font color="blue">启用</font>第一个
<input type="radio" value="1" name="JDTHType2" <%if JDTHType2=1 then response.write "checked"%> class="form" onclick="JDTH2.style.display=''"><font color="blue">启用</font>第二个
<input type="radio" value="1" name="JDTHType3" <%if JDTHType3=1 then response.write "checked"%> class="form" onclick="JDTH3.style.display=''"><font color="blue">启用</font>第三个<br>
<input type="radio" value="0" name="JDTHType1" <%if JDTHType1=0 then response.write "checked"%> class="form" onclick="JDTH1.style.display='none'">废除第一个
<input type="radio" value="0" name="JDTHType2" <%if JDTHType2=0 then response.write "checked"%> class="form" onclick="JDTH2.style.display='none'">废除第二个
<input type="radio" value="0" name="JDTHType3" <%if JDTHType3=0 then response.write "checked"%> class="form" onclick="JDTH3.style.display='none'">废除第三个</td>
</tr>
<tr id="JDTH1" style="display:<%if JDTHType1=0 then response.write "none"%>">
<td width="50%" colspan=2 align="center" class=alt2>原文内容：<br>
<textarea name="JDTH1sStr" cols=30 rows=6 class=form><%=JDTH1sStr%></textarea>
</td>
<td width=50% colspan=2 align=center class=alt1>替换内容：<br>
<textarea name="JDTH1oStr" cols=30 rows=6 class=form><%=JDTH1oStr%></textarea>
</td>
</tr>
<tr id="JDTH2" style="display:<%if JDTHType2=0 then response.write "none"%>">
<td width="50%" colspan=2 align="center" class=alt2>原文内容：<br>
<textarea name="JDTH2sStr" cols=30 rows=6 class=form><%=JDTH2sStr%></textarea>
</td>
<td width=50% colspan=2 align=center class=alt1>替换内容：<br>
<textarea name="JDTH2oStr" cols=30 rows=6 class=form><%=JDTH2oStr%></textarea>
</td>
</tr>
<tr id="JDTH3" style="display:<%if JDTHType3=0 then response.write "none"%>">
<td width="50%" colspan=2 align="center" class=alt2>原文内容：<br>
<textarea name="JDTH3sStr" cols=30 rows=6 class=form><%=JDTH3sStr%></textarea>
</td>
<td width="50%" colspan=2 align="center" class=alt1>替换内容：<br>
<textarea name="JDTH3oStr" cols=30 rows=6 class=form><%=JDTH3oStr%></textarea>
</td>
</tr>
<tr id="NewsPaing2">
<td align="right" class="alt2" width="30%"><font color="blue">章节内容高级替换：</font></td>
<td class="alt1" colspan=3 width="70%">
<input type="radio" value="1" name="GJTHType1" <%if gjthtype1=1 then response.write "checked"%> class="form" onclick="GJTH1.style.display=''"><font color="blue">启用</font>第一个
<input type="radio" value="1" name="GJTHType2" <%if gjthtype2=1 then response.write "checked"%> class="form" onclick="GJTH2.style.display=''"><font color="blue">启用</font>第二个
<input type="radio" value="1" name="GJTHType3" <%if gjthtype3=1 then response.write "checked"%> class="form" onclick="GJTH3.style.display=''"><font color="blue">启用</font>第三个<br>
<input type="radio" value="0" name="GJTHType1" <%if gjthtype1=0 then response.write "checked"%> class="form" onclick="GJTH1.style.display='none'">废除第一个
<input type="radio" value="0" name="GJTHType2" <%if gjthtype2=0 then response.write "checked"%> class="form" onclick="GJTH2.style.display='none'">废除第二个
<input type="radio" value="0" name="GJTHType3" <%if gjthtype3=0 then response.write "checked"%> class="form" onclick="GJTH3.style.display='none'">废除第三个</td>
</tr>
<tr id="GJTH1" style="display:<%if gjthtype1=0 then response.write "none"%>">
<td colspan=3 align="center" class="alt2" width="75%">原文内容开始标记： 原文内容结束标记：<br>
<textarea name="GJTH1sStr" cols="25" rows="5" class="form"><%=GJTH1sStr%></textarea>
<textarea name="GJTH1oStr" cols="25" rows="5" class="form"><%=GJTH1oStr%></textarea></td>
<td align="center" class="alt1" width="25%">替换内容：<br>
<textarea name="GJTH1cStr" cols="35" rows="5" class="form"><%=GJTH1cStr%></textarea>
</td>
</tr>
<tr id="GJTH2" style="display:<%if gjthtype2=0 then response.write "none"%>">
<td colspan=3 align="center" class="alt2" width="75%">原文内容开始标记： 原文内容结束标记：<br>
<textarea name="GJTH2sStr" cols="25" rows="5" class="form"><%=GJTH2sStr%></textarea>
<textarea name="GJTH2oStr" cols="25" rows="5" class="form"><%=GJTH2oStr%></textarea></td>
<td align="center" class="alt1" width="25%">替换内容：<br>
<textarea name="GJTH2cStr" cols="35" rows="5" class="form"><%=GJTH2cStr%></textarea>
</td>
</tr>
<tr id="GJTH3" style="display:<%if gjthtype3=0 then response.write "none"%>">
<td colspan=3 align="center" class="alt2" width="75%">原文内容开始标记： 原文内容结束标记：<br>
<textarea name="GJTH3sStr" cols="25" rows="5" class="form"><%=GJTH3sStr%></textarea>
<textarea name="GJTH3oStr" cols="25" rows="5" class="form"><%=GJTH3oStr%></textarea></td>
<td align="center" class="alt1" width="25%">替换内容：<br>
<textarea name="GJTH3cStr" cols="35" rows="5" class="form"><%=GJTH3cStr%></textarea>
</td>
</tr>
<textarea name="Content" style="display:none"><%=ContentTest%></textarea>
<tr>
<td colspan=4 align="center" class="alt3">
<input name="ItemID" type="hidden" value="<%=ItemID%>">
<input name="readType" type="hidden" value="<%=readType%>">
<input name="readType1" type="hidden" value="<%=readType1%>">
<input type="hidden" name="UrlTest" value="<%=UrlTest%>">
<input type="button" name="button1" value="上 一 步" onclick="window.location.href='javascript:history.go(-1)'" class="button">
<input type="submit" name="Submit" value="下 一 步" class="button"></td>
</tr>
</form>
</table>
<%End If
End If
end sub
Sub cookse()
cook=Trim(Request.Form("cookTest"))
VsString=Request.Form("VsString")
VoString=Request.Form("VoString")
TitleTypes=Trim(Request.Form("TitleTypes"))
TsType=Trim(Request.Form("TsType"))
ToType=Trim(Request.Form("ToType"))
TsString=Request.Form("TsString")
ToString=Request.Form("ToString")
TitleType1=Trim(Request.Form("TitleType1"))
TsType1=Trim(Request.Form("TsType1"))
ToType1=Trim(Request.Form("ToType1"))
TsString1=Request.Form("TsString1")
ToString1=Request.Form("ToString1")
CsType=Trim(Request.Form("CsType"))
CoType=Trim(Request.Form("Cotype"))
CsString=Request.Form("CsString")
CoString=Request.Form("CoString")
ContType1=Trim(Request.Form("ContType1"))
CsType1=Trim(Request.Form("CsType1"))
CoType1=Trim(Request.Form("Cotype1"))
CsString1=Request.Form("CsString1")
CoString1=Request.Form("CoString1")
ContType2=Trim(Request.Form("ContType2"))
CsType2=Trim(Request.Form("CsType2"))
CoType2=Trim(Request.Form("Cotype2"))
CsString2=Request.Form("CsString2")
CoString2=Request.Form("CoString2")
cookTypes=Trim(Request.Form("cookTypes"))
cookType=Trim(Request.Form("cookType"))
cookStr=Request.Form("cookStr")
costype=Trim(Request.Form("costype"))
cootype=Trim(Request.Form("cootype"))
cosString=Request.Form("cosString")
cooString=Request.Form("cooString")
cookType1=Trim(Request.Form("cookType1"))
costype1=Trim(Request.Form("costype1"))
cootype1=Trim(Request.Form("cootype1"))
cosString1=Request.Form("cosString1")
cooString1=Request.Form("cooString1")
JDTHType1=Trim(Request.Form("JDTHType1"))
JDTHType2=Trim(Request.Form("JDTHType2"))
JDTHType3=Trim(Request.Form("JDTHType3"))
JDTH1sStr=Request.Form("JDTH1sStr")
JDTH1oStr=Request.Form("JDTH1oStr")
JDTH2sStr=Request.Form("JDTH2sStr")
JDTH2oStr=Request.Form("JDTH2oStr")
JDTH3sStr=Request.Form("JDTH3sStr")
JDTH3oStr=Request.Form("JDTH3oStr")
If ItemID="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>ItemID参数错误，请从有效链接进入</li>"
Else
ItemID=Clng(ItemID)
End If
If UrlTest="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>参数错误，数据传递时发生错误</li>"
Else
NewsUrl=UrlTest
End If
If VsString="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>章节页面开始标记不能为空</li>"
End If
If VoString="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>章节页面结束标记不能为空</li>"
End If
If CsString="" or CsType="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>正文开始标记不能为空</li>"
End If
If CoString="" or CoType="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>正文结束标记不能为空</li>"
End If
If ContType1="" then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请选择是否修正章节正文</li>"
Else
ContType1=Clng(ContType1)
If ContType1=1 Then
If CsString1="" or CoString1="" or CsType1="" or CoType1="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请将章节正文修正的开始/结束标记填写完整</li>"
End If
ElseIf ContType1=0 Then
Else
FoundErr=True
ErrMsg=ErrMsg & "<br><li>ContType1参数错误，请从有效链接进入</li>"
End If
End If
If ContType2="" then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请选择获取到的正文类型</li>"
Else
ContType2=Clng(ContType2)
If ContType2=2 Then
If CsString2="" or CoString2="" or CsType2="" or CoType2="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请将TXT文件中正文的开始/结束标记填写完整</li>"
End If
ElseIf ContType2=3 Then
ElseIf ContType2=1 Then
ElseIf ContType2=0 Then
Else
FoundErr=True
ErrMsg=ErrMsg & "<br><li>正文类型参数错误，请从有效链接进入</li>"
End If
End If
If cookTypes=0 Then
If cookType="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请设置分卷标题</li>"
Else
cookType=Clng(cookType)
If cookType=0 Then
ElseIf cookType=1 Then
If cosString="" or cooString="" or cosType="" or cooType="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请将分卷标题的开始/结束标记填写完整！</li>"
Else
If cookType1="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请选择是否修正分卷标题</li>"
Else
cookType1=Clng(cookType1)
If cookType1=1 Then
If cosString1="" or cooString1="" or cosType1="" or cooType1="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请将分卷标题修正的开始/结束标记填写完整</li>"
End If
ElseIf cookType1=0 Then
Else
FoundErr=True
ErrMsg=ErrMsg & "<br><li>cookType1参数错误，请从有效链接进入</li>"
End If
End If
End If
ElseIf cookType=2 Then
If cookStr="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请指定分卷标题</li>"
End If
Else
FoundErr=True
ErrMsg=ErrMsg & "<br><li>分卷标题<参数错误，请从有效链接进入</li>"
End If
End If
End If
If TitleTypes=0 Then
If TsString="" or ToString="" or TsType="" or ToType="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请将章节标题的开始/结束标记填写完整</li>"
Else
If TitleType1="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请选择是否修正章节标题</li>"
Else
TitleType1=Clng(TitleType1)
If TitleType1=1 Then
If TsString1="" or ToString1="" or TsType1="" or ToType1="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请将章节标题修正的开始/结束标记填写完整</li>"
End If
ElseIf TitleType1=0 Then
Else
FoundErr=True
ErrMsg=ErrMsg & "<br><li>TitleType1参数错误，请从有效链接进入</li>"
End If
End If
End If
End If
If JDTHType1="" Then
FoundErr=True
ErrMsg=ErrMsg & "<br><li>请选择是否替换章节内容一</li>"
ElseIf JDTHType1=1 then
If JDTH1sStr="" then
FoundErr=Tru⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -