|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有帐号?立即注册
x
Access是一种桌面数据库,只适合数据量少的应用,在处理少量数据和单机访问的数据库时是很好的,效率也很高。但是它的同时访问客户端不能多于4个。access数据库有一定的极限,如果数据达到100M左右,很容易造成服务器iis假死,或者消耗掉服务器的内存导致服务器崩溃。函数|文本框<%
FunctionRequestText(TextString,TextType,TextName,TextNumberMost,TextNumberLeast)
TextString猎取文本框内的值
TextType设定文本框称号的范例,如input为0,textarea为1
TextName碰着毛病时显现的称号
TextNumberMost文本框能填进的字节最年夜数
TextNumberLeast文本框能填进的字节最小数
GetText=Request(TextString)
SelectCaseTextType
Case0
GetText=Replace(GetText,"<","<")
GetText=Replace(GetText,">",">")
GetText=Replace(GetText,"","")
ifLen(GetText)>TextNumberMostthen
Response.Write("<Script>alert(""您在"&TextName&"项输出字节凌驾最年夜字节"&TextNumberMost&",请前往从头输出!"");history.go(-1)</script>")
Response.End
ElseifLen(GetText)<TextNumberLeastthen
Response.Write("<Script>alert(""您在"&TextName&"项输出字节小于了最小字节"&TextNumberLeast&",请前往从头输出!"");history.go(-1)</script>")
Response.End
Endif
Case1
GetText=Replace(GetText,"<","<")
GetText=Replace(GetText,">",">")
GetText=Replace(GetText,"","")
GetText=Replace(GetText,"","")
GetText=Replace(GetText,vbCrlf,"<br/>")
ifLen(GetText)>TextNumberMostthen
Response.Write("<Script>alert(""您在"&TextName&"项输出字节凌驾最年夜字节"&TextNumberMost&",请前往从头输出!"");history.go(-1)</script>")
Response.End
ElseifLen(GetText)<TextNumberLeastthen
Response.Write("<Script>alert(""您在"&TextName&"项输出字节小于了最小字节"&TextNumberLeast&",请前往从头输出!"");history.go(-1)</script>")
Response.End
Endif
EndSelect
RequestText=GetText
EndFunction
%>
<%
例子
ifRequest("post")""then
Name=RequestText("Name",0,"姓名",10,2)
Text=RequestText("Text",0,"内容",255,0)
Response.Write"姓名值为:"&Name&"<br>内容值为:"&Text
Endif
%>
<formmethod="GET">
<p>姓名<inputtype="text"name="name"size="20"></p>
<p>内容<textarearows="6"name="text"cols="20"></textarea><inputtype="submit"value="提交"name="post">
<inputtype="reset"value="重置"name="B2"></p>
</form>
减少客户内IT专业人才缺乏带来的影响。ASP的客户员工利用浏览器进入相关的应用软件,简单易用,无需专业技术支持。 |
|