在asp如何给变量自动加字?

在asp如何给变量自动加字?,第1张

如果确定字符长度,并且在指定位置(比如你的例子:“我是”,然后指定在第二个字前面加“们”)

'----------------------------------------------------------

'TargetString:目标字符

'Dir:指定位置,第几个位置

'MM_String:需要插入的字符

'-------------------------------------------------------------

Function Addstring(TargetString,Dir,MM_String)

IF Dir >Len(Trim(TargetString)) Then

Addstring = TargetString

Else

StartString = Left(TargetString,Dir-1)

EndString = Right(TargetString,Len(Trim(TargetString))-Dir+1)

Addstring =StartString &MM_String &EndString

End IF

End Function

如果不确定字符串长度,只是在特定的字后面添加某字符,则:

'----------------------------------------------------------

'TargetString:目标字符串

'CheckString:指定字符

'MM_String:需要插入的字符

'-------------------------------------------------------------

Function AddstringX(TargetString,CheckString,MM_String)

IF Instr(TargetString,CheckString)<0 Then

AddstringX = TargetString

Else

StartString = Left(TargetString,Instr(TargetString,CheckString))

EndString = Right(TargetString,Len(TargetString)-Instr(TargetString,CheckString))

AddstringX =StartString &MM_String &EndString

End IF

End Function

------------------------------------------------------------

注:以上代码在Windows 7+IIS6中测试通过。

测试范例:

<%

MM_String = "我是中国人"

%>

<%=AddstringX(MM_String,"我","们都")%><br />

<%=addstring(MM_String,2,"们")%><br />

sql="ALTER TABLE doc_exa ADD column_b VARCHAR(20) NULL "

然后用一个对象(connection对象或recordset对象)来执行这条SQL语句

doc_exa是表名

column_b是新加的字段

VARCHAR(20)是新加字段的类型和长度

以上的3个变量可以通过表单输入来做成动态的

大致就是这样的~


欢迎分享,转载请注明来源:内存溢出

原文地址: http://outofmemory.cn/bake/11961510.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-20
下一篇 2023-05-20

发表评论

登录后才能评论

评论列表(0条)

保存