以我的热点推荐为例子..
'//热点推荐
Function Update03()
Dim TemplateFilePath
TemplateFilePath=Server.MapPath(" ../../index.htm ")
Dim TClass,strHtml,I
Set TClass=New Tkl_TemplateClass
strHtml=""
Dim Rs,Sql
Sql="Select Top 5 Title,FilePath,SmallImg,ShortContent,AddTime From view_NewsInfo Where Instr(','+Speciality+',',',35,')<>0 Order By Id DESC"
Set Rs=Conn.ExeCute(Sql)
TClass.OpenTemplate(TemplateFilePath)
strHtml = ""
For I=1 To 5
If Rs.Eof Then
Exit For
End If
strHtml = strHtml & " ·<a href=""" & Rs("FilePath") & """ target=""_blank"" title=""" & Rs("Title") & """>" & StrClass.CutStr(Rs("Title"),23) & "</a><br /> " & vbCrLf
Rs.MoveNext
Next
With TClass
.StartElement=" <!---热点推荐:start--> "
.EndElement=" <!---热点推荐:end--> "
.Value=strHtml
.ReplaceTemplate()
End With
Rs.Close
Set Rs=Nothing
TClass.Save()
Set TClass=Nothing
End Function
请大家特别注意颜色标注的地方．．．．是容易出错的地方．．
复制内容到剪贴板代码:
·<a href=""" & Rs("FilePath") & """ target=""_blank"" title=""" & Rs("Title") & """>" & StrClass.CutStr(Rs("Title"),23) & "</a><br />
实现了自定义输出样式．．
比如我图文的样式：
复制内容到剪贴板代码:
<a href=""" & Rs("FilePath") & """ target=""_blank"" title=""" & Rs("Title") & """><img src=""" & Rs("SmallImg") & """ width=""120"" height=""80"" border=""1"" style=""border-color:#000000"" align=""left"" /></a><a href=""" & Rs("FilePath") & """ target=""_blank"" title=""" & Rs("Title") & """><strong>" & Rs("Title") & "</strong></a><br />" & StrClass.CutStr(Rs("ShortContent"),200)
并无固定形式．．．完全自己定义．．
说到特性．．．应该提下嵌入．．．
在页面更新的上面．．
嵌入也提供了一种更新模式．还是通过<!-元素标签-开始--><!--元素标签-结束-->．．
但是于特性不同的是．．
并不格式化．．也就是说适合放置广告代码．．
比如首页的banner广告．．
定义了<!--banner:start--><!--banner:end-->
然后在嵌入里面编辑(可视化，这以代码为例子)
复制内容到剪贴板代码:
<a href="http://www.31u.net/bbs/dispbbs.asp?boardID=2&ID=22&page=1" target="_blank" title="讲述大学爱情"><img src="http://www.31u.net/UpLoadFiles/NewsPhoto/00105a01.jpg" width="468" height="60" border="0" /></a>
当然你也可以插入flash
复制内容到剪贴板代码:
<object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="533" height="104">
<param name="movie" value="http://www.31u.net/image/flash_538.swf">
<param name="quality" value="high">
<embed src="http://www.31u.net/image/flash_538.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="533" height="104"></embed>
</object>
看出来和特性的区别吗？？
特性是在page01这样的文件中定义好了输出方式．．．而这个没有．．;)
嵌入可以同时更新多点．．．
好了。．自己体会一下吧．．．
