日韩天天综合网_野战两个奶头被亲到高潮_亚洲日韩欧美精品综合_av女人天堂污污污_视频一区**字幕无弹窗_国产亚洲欧美小视频_国内性爱精品在线免费视频_国产一级电影在线播放_日韩欧美内地福利_亚洲一二三不卡片区

風(fēng)訊3系列文章內(nèi)容“畫中畫廣告”實(shí)現(xiàn)方法(2)_風(fēng)訊Cms教程

編輯Tag賺U幣
教程Tag：暫無Tag,歡迎添加,賺取U幣!

ModifyContent=LeftContent & headAdStr & "<script src=/JS/AdsJS/801.js>< /script>" & tailAdStr & RightContent
TempletContent = Replace(TempletContent,"{News_Content}",ModifyContent)
'TempletContent = Replace(TempletContent,"{News_Content}",NewsContent)
'===================================================結(jié)束
if Not IsNull(NewsRecordSet("TxtSource")) then
TempletContent = Replace(TempletContent,"{News_TxtSource}",NewsRecordSet("TxtSource"))
else
TempletContent = Replace(TempletContent,"{News_TxtSource}","")
end if
if Not IsNull(NewsRecordSet("Editer")) then
TempletContent = Replace(TempletContent,"{News_TxtEditer}",NewsRecordSet("Editer"))
else
TempletContent = Replace(TempletContent,"{News_TxtEditer}","")
end if
if Not IsNull(NewsRecordSet("AddDate")) then
TempletContent = Replace(TempletContent,"{News_AddDate}",NewsRecordSet("AddDate"))
else
TempletContent = Replace(TempletContent,"{News_AddDate}","")
end if
TempletContent = Replace(TempletContent,"{News_SendFriend}","<a href=" & AvailableDoMain & "/" & "Sendmail.asp?NewsID=" & NewsRecordSet("NewsID") & " target=""_blank"">發(fā)送給好友</a>")
TempletContent = Replace(TempletContent,"{News_ClickNum}","<script src=" & AvailableDoMain & "/" & "Click.asp?NewsID="& RefreshID &"></script>")
TempletContent = Replace(TempletContent,"{News_ReviewContent}","<script src=" & AvailableDoMain & "/" & "ReviewContent.asp?NewsID="& NewsRecordSet("NewsID") &"></script>")
'Added By Koolls at 2005.10.11
TempletContent = Replace(TempletContent,"{News_Favorite}","<a target=""_blank"" Href=" & AvailableDoMain & "/" & UserDir &"/AddFavorite.asp?NewsID="& NewsRecordSet("ID") &">添加到收藏夾</a>")
Dim ReviewStr
if NewsRecordSet("ReviewTF") = 1 then
ReviewStr = "<table width=""100%"" border=""0"" cellpadding=""3"" cellspacing=""1""><form name=""form1"" method=""post"" action=""" & AvailableDoMain & "/" & "NewsReview.asp?action=add&NewsID=" & NewsRecordSet("NewsID") & """><tr>"
ReviewStr = ReviewStr & "<td width=""21%""><div align=right>會(huì)員名稱：</div></td>"
ReviewStr = ReviewStr & "<td width=""79%""> <input name=""MemName"" type=""text"" id=""MemName"" size=""10"" value="""">密碼：<input name=""Password"" type=""password"" size=""8"" id=""Password""><input name=""NoName"" type=""checkbox"" id=""NoName"" value=""1"">匿名 <font color=""#FF0000"">·</font><a href=""" & AvailableDoMain & "/"& UserDir &"/sRegister.asp""><font color=""#FF0000"">注冊</font></a>·<a href=""" & AvailableDoMain & "/"& UserDir &"/User_GetPassword.asp"">忘記密碼？</a></td></tr>"
ReviewStr = ReviewStr & "<td> <input name=""NewsID"" type=""hidden"" id=""NewsID"" value=""" & NewsRecordSet("NewsID") & """>"

查看更多 風(fēng)訊cms教程  風(fēng)訊cms模板

來源：模板無憂//所屬分類：風(fēng)訊Cms教程/更新時(shí)間：2006-10-29
相關(guān)風(fēng)訊Cms教程：