<%dimp,ppic,dpicppic=12randomizep=Int((ppic*rnd)+1)dpic="chunfeng/images/"&p&".gif"%> [1]...

<%FunctionComma(str)IfNot(IsNumeric(str))Orstr=0Then Result=0ElseIfLen(Fix(str))<4Then Result=strElse Pos=Instr(1,str,".") IfPos>0Then Dec=Mid(str,Pos) Endif Res=StrReverse(Fix(str)) LoopCount=1 WhileLoopCount<=Len(Res) TempResult=TempRes...

如何让一个方框栏内的文字滚动显示？<!--#includefile="news.inc"--><%dimNewsStr(1,5)NewsStr(0,0)="下载本栏链接"NewsStr(1,0)="http://www.intels.net/" NewsStr(0,1)="中国水利水电出版社"NewsStr(1,1)="http://www.waterpub.com.cn/" NewsStr(0,2)="随风起舞"NewsStr(1,2)="http://www.intels.net/" NewsStr(0,3)="闪亮日子"NewsStr(1,...