randomize
set srst=conn.execute("select top 2 wt_title,wt_fileurl,wt_Description,wt_keywords from wd_news where wt_isview=1 order by rnd(-(wt_id +"&rnd()&")) ")
此类效果一般为主动随机推荐信息
...
'随机字体
'##############################################
'# 取得一个随机字体大小
'##############################################
Public Function GetRandomFont()
dim f1,f2,f3,f4,f5,f6,f7 '字体
...
HttpWatch强大的网页数据分析工具.集成在Internet Explorer工具栏.包括网页摘要.Cookies管理.缓存管理.消息头发送/接受.字符查询.POST 数据和目录管理功能.报告输出 HttpWatch 是一款能够收集并显示页页深层信息的软件。它不用代理服务器或一些复杂的网络监控工具，就能够在显示网页同时显示网页请求和回应的日志信息。甚至可以显示浏览器缓存和IE之间的交换信息。集成在Internet Explorer工具栏。
...回车，ASCII码13
换行，ASCII码10
空格，ASCII码32
Return = CR = 13 = '\x0d'
NewLine = LF = 10 = '\x0a'
...
'**************************检查是否是手机号码************************
function checkMobile(no)
if no ="" or isnull(no) = true then
checkMobile=false
exit function
end if
...
最新评论