etchk.asp

PDA,若你死昂师傅你说的附件是打开附件上课的附件四度空间就大方快速减肥

<!--#include file="../../ACT_inc/ACT.User.asp"-->
<%
Dim Title,Rs,ModeID
Title = ACTCMS.RSQL(ACTCMS.s("Title"))
ModeID = ACTCMS.ChkNumeric(Request("ModeID"))
If ModeID = 0 Then ModeID = 1
if Title="" Then
	response.write  "[err]Title 不能为空[/err]"
Else 
	Set Rs=ActCMS.ACTEXE("select id from "&ACTCMS.ACT_C(ModeID,2)&" where title='"&Title&"'")
	If Rs.BOF And Rs.EOF Then
		response.Write("0")
	else
		response.Write("1")	
	end if
End  if
Set  RS = nothing
%>