showinfo.asp

正版创力4.1SQL商业版!!!ASP版。

<!--#include file="Channel_Setting.asp"-->
<!--#include file="../Inc/Cl_Receive.asp"-->
<%
If InfoID<1 Then Call Cl.OutErr(0,Cl.ReplaceItem(Cl.Language.SelectSingleNode("//InfoNoFind").text))
Dim sHTMLUrl
If rs("IsLink")=True Then
	sHTMLUrl = Rs("HTMLFileUrl")
	rs.Close : Set rs=Nothing
	Response.redirect sHTMLUrl
ElseIf rs("IsHTML")=True And Clng(Cl.Channel.selectSingleNode("@iscreatehtml").text)=1 Then
	sHTMLUrl = Rs("HTMLFileUrl")
	rs.Close : Set rs=Nothing
	Response.redirect InstallDir & sHTMLUrl
End If
PageData.Article_Show
Response.write Template.ReplaceAllFlag(TempStr)
Rs.Close : Set Rs=Nothing
CloseAllObj
'==================================================
'CreateLive CMS Version 4.0
'							Powered by Aspoo.CN
'
'邮箱: [e-mail]		[e-mail]
'ＱＱ: 3315263				596197794
'网站: www.aspoo.cn			www.aspoo.com
'论坛: bbs.aspoo.cn			bbs.aspoo.com
'
'Copyright (C) 2005-2007 Aspoo.CN All Rights Reserved.
'==================================================
%>