展开全部
left(rs("字段2"),6)
left(要截取的字符串,要截取的长度)’从左边开始截取指定长度的字符
right(要截取的字符串,要截取的长度)’从右边开始截取指定长度的字符
MID(要截取的字符串,开始截取的位置,
要截取的长度)从任意位置开始截取指定长度的字符
另外:
'Strsub
'函数功能:字符串截取.
'参数意义:str
---
要截取的字符串.
lennum--截取的字符数.
s--结尾字符
Function
Strsub(str,lennum,s)
If
Not
IsNull(str)
Then
Dim
p_num,x
Dim
i
If
strlen(str)<=lennum
Then
Strsub=str
Else
p_num=0
x=0
Do
While
Not
p_num
>
lennum-2
x=x+1
If
Asc(Mid(str,x,1))<0
Then
p_num=Int(p_num)
+
2
Else
p_num=Int(p_num)
+
1
End
If
Strsub=Left(Trim(str),x)&s
//截取后定义超出部分内容的显示方式
Loop
End
If
Else
Strsub="Null"
End
If
End
Function
'调用
<%=Function
Strsub("aaaaaaaaaa",3,"...")%>
'将输出:aaa...
left(要截取的字符串,要截取的长度)’从左边开始截取指定长度的字符
right(要截取的字符串,要截取的长度)’从右边开始截取指定长度的字符
MID(要截取的字符串,开始截取的位置,
要截取的长度)从任意位置开始截取指定长度的字符
另外:
'Strsub
'函数功能:字符串截取.
'参数意义:str
---
要截取的字符串.
lennum--截取的字符数.
s--结尾字符
Function
Strsub(str,lennum,s)
If
Not
IsNull(str)
Then
Dim
p_num,x
Dim
i
If
strlen(str)<=lennum
Then
Strsub=str
Else
p_num=0
x=0
Do
While
Not
p_num
>
lennum-2
x=x+1
If
Asc(Mid(str,x,1))<0
Then
p_num=Int(p_num)
+
2
Else
p_num=Int(p_num)
+
1
End
If
Strsub=Left(Trim(str),x)&s
//截取后定义超出部分内容的显示方式
Loop
End
If
Else
Strsub="Null"
End
If
End
Function
'调用
<%=Function
Strsub("aaaaaaaaaa",3,"...")%>
'将输出:aaa...
展开全部
2楼搞那么麻烦干嘛,复制那么多有用?left函数都不知道你让他去看函数,抄袭也不是这么抄袭的吧!
很明显他是ASP调用数据库查询结果,如果要输出6位,可以用LEFT函数,但是这个函数也是ASP里面的,所以必须包含在<%=和%>之间来使用,所以你要求的结果是<%=left(rs("字段2"),6)%>,同时,如果RS("字段2")的返回长度不足6位,那么结果将返回所有结果,但是如果RS的返回值是空的或记录是null,那么有可能会产生错误,所以在调用这个之前最好先加一个判断!
很明显他是ASP调用数据库查询结果,如果要输出6位,可以用LEFT函数,但是这个函数也是ASP里面的,所以必须包含在<%=和%>之间来使用,所以你要求的结果是<%=left(rs("字段2"),6)%>,同时,如果RS("字段2")的返回长度不足6位,那么结果将返回所有结果,但是如果RS的返回值是空的或记录是null,那么有可能会产生错误,所以在调用这个之前最好先加一个判断!
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
left(rs("字段2"),6)
left(要截取的字符串,要截取的长度)’从左边开始截取指定长度的字符
right(要截取的字符串,要截取的长度)’从右边开始截取指定长度的字符
MID(要截取的字符串,开始截取的位置, 要截取的长度)从任意位置开始截取指定长度的字符
另外:
'Strsub
'函数功能:字符串截取.
'参数意义:str --- 要截取的字符串. lennum--截取的字符数. s--结尾字符
Function Strsub(str,lennum,s)
If Not IsNull(str) Then
Dim p_num,x
Dim i
If strlen(str)<=lennum Then
Strsub=str
Else
p_num=0
x=0
Do While Not p_num > lennum-2
x=x+1
If Asc(Mid(str,x,1))<0 Then
p_num=Int(p_num) + 2
Else
p_num=Int(p_num) + 1
End If
Strsub=Left(Trim(str),x)&s //截取后定义超出部分内容的显示方式
Loop
End If
Else
Strsub="Null"
End If
End Function
'调用
<%=Function Strsub("aaaaaaaaaa",3,"...")%>
'将输出:aaa...
left(要截取的字符串,要截取的长度)’从左边开始截取指定长度的字符
right(要截取的字符串,要截取的长度)’从右边开始截取指定长度的字符
MID(要截取的字符串,开始截取的位置, 要截取的长度)从任意位置开始截取指定长度的字符
另外:
'Strsub
'函数功能:字符串截取.
'参数意义:str --- 要截取的字符串. lennum--截取的字符数. s--结尾字符
Function Strsub(str,lennum,s)
If Not IsNull(str) Then
Dim p_num,x
Dim i
If strlen(str)<=lennum Then
Strsub=str
Else
p_num=0
x=0
Do While Not p_num > lennum-2
x=x+1
If Asc(Mid(str,x,1))<0 Then
p_num=Int(p_num) + 2
Else
p_num=Int(p_num) + 1
End If
Strsub=Left(Trim(str),x)&s //截取后定义超出部分内容的显示方式
Loop
End If
Else
Strsub="Null"
End If
End Function
'调用
<%=Function Strsub("aaaaaaaaaa",3,"...")%>
'将输出:aaa...
参考资料: http://zhidao.baidu.com/question/71706825.html
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
<%=left(rs("字段2"),6)%>
(left)代表从左起,(,6)表示第六个字符
多简单啊
(left)代表从左起,(,6)表示第六个字符
多简单啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
<%=left(rs("字段2"),6)%>
(left)代表从左起,(,6)表示第六个字符
多简单啊
(left)代表从左起,(,6)表示第六个字符
多简单啊
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询