qq_16959405的专栏

以下为代码，可放置在网站foot底部文件，或者haead顶部文件，建议将代码放在网站顶部，这样可以实现手机访问立即跳转！ uaredirect("http://m.jiuquan.cc"); 将代码网址部分改成你网站的手机网址就Ok,当然可以是任意网址！ 这应该就是传说中的WAP自动跳转吧！

过滤所有hmtl Function LoseHtml(ContentStr) Dim ClsTempLoseStr,regEx ClsTempLoseStr = Cstr(ContentStr) Set regEx = New RegExp regEx.Pattern = "]*>" regEx.IgnoreCase = True regEx.Global = True ClsTempLoseS

如果本身没有预览功能： 在 upload.asp 中查找  if Instr(intTemp,strTemp,".") 大概在657行 在该上面添加 '如果intTemp 为0 对intTemp重新赋值为1；如果不为0那就默认即可 if intTemp intTemp = intTemp else intTemp = 1 end if 该代码即可 报错原因是