用于首页新闻标题的显示,超过10个字用..代替,我好象记得有人问过,但我找不到了,大家帮下忙吧~!我的全部代码是这样写的,改完再全部发一次,本人是一文盲。谢谢了SubIndex_News()...
用于首页新闻标题的显示,超过10个字用..代替,我好象记得有人问过,但我找不到了,大家帮下忙吧~!我的全部代码是这样写的,改完再全部发一次,本人是一文盲。谢谢了
Sub Index_News()
Set Rs=Server.CreateObject("Adodb.RecordSet")
Sql="select Top " & NewsMax_Index & " * from Tx_News where News_Flag=1 and News_Index=1 and News_ClassId=8 order by News_Date desc"
Rs.Open sql,Conn,1,1
IF Rs.recordCount=0 THEN
Call Page_check(4,0)
Else
While Not Rs.Eof
Response.Write "
"Rs.MoveNext
Wend
End IF
Rs.close
Set Rs=Nothing
End Sub
展开