注册 登录
编程论坛 ASP技术论坛

表单提交后如何限制字限

a190066 发布于 2011-05-29 05:35, 797 次点击
表单提交后如何限制字限:

在提交表单时为了排序,标记了数字,有5到6个字。写入库时不需了,字限为3.
。所以想通过限制字从左left(rs 写入到库里。字限为3.特此请教网友。
<!--#include file="conn.asp"-->
<%
WLbNO1=request("WLbNO1")
WLbNO2=request("WLbNO2")
WLbNO3=request("WLbNO3")
WLbNO4=request("WLbNO4")
WLbNO5=request("WLbNO5")
set rs=server.createobject("adodb.recordset")
sql="select * from WLNO2002 where id="&request("id")
rs.open sql,conn,1,3
rs("WLbNO1")=WLbNO1
rs("WLbNO2")=WLbNO2
rs("WLbNO3")=WLbNO3
rs("WLbNO4")=WLbNO4
rs("WLbNO5")=WLbNO5
rs.update
rs.close
vip=Request.ServerVariables("Remote_Addr")
set rs=server.createobject("adodb.recordset")
sql1="select * from log"
rs.open sql1,conn,2,2
rs.addnew
rs("name")=request.cookies("adminname")
rs("title")="修改"&"入库量"&request("userid")
rs("ip")=vip
rs("time")=now()
rs.update
rs.close
set rs=nothing
conn.close
response.redirect"B2.asp?id="&request("id")
%>
7 回复
#2
wangjy5002011-05-29 09:42
left(a,3)
#3
a1900662011-05-29 13:23
显示前三位字限可以用<%=left(rs("WLbNO1"),3)%>
我现在想只有前三位的字才能写入库里,不是显示,而是写入。
请问你说的  left(a,3)  a代表什么?可否说白点,谢谢。
#4
yiyaozjk2011-05-29 15:46
if  Len(str)=3
then

end if
啦??楼主不是这个意思吗?
#5
a1900662011-05-30 01:48
回复 4楼 yiyaozjk
用if  Len(str)=3
then

end if
提示出错。。。请写出详细代码。谢谢。
#6
hams2011-05-30 08:08
最最基础的东西为什么不能先学学呢?还没学会走就想跑了,自然要摔的。
#7
a1900662011-05-30 23:05
我从广东省来到上海,想再到北京,怎样也出跑不出市区。问路人:“请问往北京怎样走”,路人答“坐飞机”。再问第二个路人“请问往北京怎样走”。路人答“你怎么不好好看看地图呢”。他们说得对。可我一直在迷惘……。没有必要再问,其实他们也不知。。。我要删掉收藏夹里的“ASP技术论坛 - 编程论坛”
#8
yms1232011-05-31 10:21
<!--#include file="conn.asp"-->
<%
WLbNO1=request("WLbNO1")
WLbNO2=request("WLbNO2")
WLbNO3=request("WLbNO3")
WLbNO4=request("WLbNO4")
WLbNO5=request("WLbNO5")
set rs=server.createobject("adodb.recordset")
sql="select * from WLNO2002 where id="&request("id")
rs.open sql,conn,1,3
rs("WLbNO1")=WLbNO1
rs("WLbNO2")=WLbNO2
rs("WLbNO3")=WLbNO3
rs("WLbNO4")=WLbNO4
rs("WLbNO5")=WLbNO5
rs.update
rs.close
vip=Request.ServerVariables("Remote_Addr")
set rs=server.createobject("adodb.recordset")
sql1="select * from log"
rs.open sql1,conn,2,2
rs.addnew
rs("name")=request.cookies("adminname")
rs("title")="修改"&"入库量"&request("userid")
rs("ip")=vip
rs("time")=now()
rs.update
rs.close
set rs=nothing
conn.close
response.redirect"B2.asp?id="&request("id")
%>
不知道你客户端是怎么写的,建议重复数据用数组来处理比如
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from WLNO2002 where id="&request("id")
rs.open sql,conn,1,3
Dim i
For i=1 To 5
    rs("WLbNO"&i)=left(Request("WLbNO"&i),3)
Next
rs.update
rs.close
vip=Request.ServerVariables("Remote_Addr")
set rs=server.createobject("adodb.recordset")
sql1="select * from log"
rs.open sql1,conn,2,2
rs.addnew
rs("name")=request.cookies("adminname")
rs("title")="修改"&"入库量"&request("userid")
rs("ip")=vip
rs("time")=now()
rs.update
rs.close
set rs=nothing
conn.close
response.redirect"B2.asp?id="&request("id")
%>
1