· JSP:Java Server PageJSP又是什么原因出现的呢?Java在推向开发人员时出现了重重困难,首先是Java缺少主流系统的广泛支持,而在所有的平台和技术上都缺少可以直接参照的应用方式。这时java就走向了在各个应用层上的积极进取,在自己擅长的与不擅长的领域都走出了坚定的脚步。其中最让Web技术人员 ...
· <%
rem 检查sql字符串中是否有单引号,有则进行转化
function CheckStr(str)
dim tstr,l,i,ch l=len(str) for i=1 to l ch=mid(str,i,1) if ch="'" then tstr=tstr+"'" end if tstr=tstr+ch next CheckStr=tstr...
· dim WINNT_CHINESE
WINNT_CHINESE = (len("论坛")=2) function strLength(str)
ON ERROR RESUME NEXT
if WINNT_CHINESE then
dim l,t,c
dim i
l=len(str)
t=l
for i=1 to l
c=as...
· function HTMLencode(str)
on error resume next
dim result
dim l
if isnull(str) then
HTMLencode=""
exit function
end if l=len(str)
result=""dim ifor i = 1 to l select case mid(str,i,1) cas...
· function chkEmail(email)
on error resume next
dim i,l,pos1,pos2
chkEmail=true
if isnull(email) then chkEmail=false:exit function
pos1= instr(email,"@")
pos2=instrRev(email,".")
if not(pos1>0) or...
· sub chkIP(boardid)
dim rsIP
dim ipArr
dim ignored
dim i
dim ip
dim sql ip=Request.ServerVariables("REMOTE_ADDR")
ignored=false
if not isempty(boardid) then
sql="select ignorei...
· <%
Response.Buffer=True'
' OneFile Search Engine (ofSearch v1.0)
' Copyright ?000 Sixto Luis Santos <sixtos@prtc.net>
' All Rights Reserved
'
' Note:
' This program is freeware. This program is NOT in the Public Domain.
' You can freely use this program in your own s...
· Before embarking on the inevitable—and not painless—migration to ASP+, it's best to know what compatibility issues you'll have to deal with by Chris Kinsman Microsoft is set to release an exciting upgrade to ASP later in 2000. This is a major upgrade unlike the minor cha...