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

📄 admin_itemmodify5.asp

📁 功能介绍： 一、会员功能模块 1、站内短信发布(设计中) 2、书架收藏夹 3、发表评论(功能不完善) 4、申请作家(与添书员整合) 5、申请添书员(与作家整合) 6、申请更新员
💻 ASP
📖 第 1 页 / 共 5 页
字号:
🔍
12345 
		<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>第一个&nbsp; 
			<input type="radio" value="1" name="JDTHType2" <%if JDTHType2=1 then response.write "checked"%> class="form" onclick="JDTH2.style.display=''"><font color="blue">启用</font>第二个&nbsp; 
			<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'">废除第一个&nbsp; 
			<input type="radio" value="0" name="JDTHType2" <%if JDTHType2=0 then response.write "checked"%> class="form" onclick="JDTH2.style.display='none'">废除第二个&nbsp; 
			<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>第一个&nbsp; 
			<input type="radio" value="1" name="GJTHType2" <%if gjthtype2=1 then response.write "checked"%> class="form" onclick="GJTH2.style.display=''"><font color="blue">启用</font>第二个&nbsp; 
			<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'">废除第一个&nbsp; 
			<input type="radio" value="0" name="GJTHType2" <%if gjthtype2=0 then response.write "checked"%> class="form" onclick="GJTH2.style.display='none'">废除第二个&nbsp; 
			<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="上&nbsp;一&nbsp;步" onclick="window.location.href='javascript:history.go(-1)'" class="button">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
			<input type="submit" name="Submit" value="下&nbsp;一&nbsp;步" 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=True
		ErrMsg=ErrMsg & "<br><li>第一个原文内容不能为空</li>"
	End If
ElseIf JDTHType1=0 then
Else
   FoundErr=True
   ErrMsg=ErrMsg & "<br><li>参数传递错误</li>"
End If
	
If JDTHType2="" Then
   FoundErr=True
   ErrMsg=ErrMsg & "<br><li>请选择是否替换章节内容一</li>"
ElseIf JDTHType2=1 then
	If JDTH2sStr="" then
		FoundErr=True
		ErrMsg=ErrMsg & "<br><li>第一个原文内容不能为空</li>"
	End If
ElseIf JDTHType2=0 then
Else
   FoundErr=True
   ErrMsg=ErrMsg & "<br><li>参数传递错误</li>"
End If
	
If JDTHType3="" Then
   FoundErr=True
   ErrMsg=ErrMsg & "<br><li>请选择是否替换章节内容一</li>"
ElseIf JDTHType3=1 then
	If JDTH3sStr="" then
		FoundErr=True
		ErrMsg=ErrMsg & "<br><li>第一个原文内容不能为空</li>"
	End If
ElseIf JDTHType3=0 then
Else
   FoundErr=True
   Er
12345

⌨️ 快捷键说明

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