ASP中轻松实现变量名-值变换

原创 2004年07月07日 13:34:00

  用过PHP的朋友都知道,PHP中变量的使用灵活方便,特别是能在字符串中方便实现变量名-值变换,使得整个PHP代码更显简洁优美。比如一条更新数据库的SQL语句只需写成:"update users set password='$password', group=$group, name='$username' where account='$account'",其中的$password、$group、$username、$account便会被实际的变量值替换,而在ASP中要实现相同的功能必须写成:"update useres set password='" & password & "',group=" & group & ",name='" & username & "' where account='" & account & "'",显得冗长难看。如果这是一条insert语言而且插入的字段内容很多的话,那么查看字段与values的对应关系将会是一个痛苦的过程。

  现在让我们看看如何在ASP实现类似的变量名-值变换。

思路

  首先,必须有一个方法把需要用实际值替换的变量名与普通的文本区分出来;然后,把所有找到的变量名用它所代表的实际值替换掉。
  对于第一点可以通过正则表达式查找得到,这里我们不采用PHP的变量表示方式,而采用大托号{}作为变量名的边界符,字符串表示变为password='{password}',group={group}。
  第二点是变量名-值变换的关键,通过变量名得到变量值。查看ASP资料没有找到直接实现的方法,但有一个函数Execute引起我们的注意,从资料说明中可知Execute可以执行传入的有效的字符串作为代码执行同,这样只要编写一个小函数就可以实现我们的要示。核心代码为:
function GetVar(var_name)
    Execute("function get_value(): get_value=" & var_name  & ": end function")
    getvar=get_value()
end function

实现

完整代码:
'=================================================================
'DESIGN BY :  彭国辉
'SITE:       
http://kacarton.yeah.net/
'BLOG:        http://blog.csdn.net/nhconch
'EMAIL:       kacarton@sohu.com

'文章为作者原创,转载前请先与本人联系,转载请注明文章出处、保留作者信息,谢谢支持!
'=================================================================


function GetVar(var_name)
    Execute("function get_value(): get_value=" & var_name  & ": end function")
    getvar=get_value()
end function

function Txt2Value(str, level)
    dim regEx, Matches, Result
    Set regEx = new RegExp
    select case level
        case 0 regEx.Pattern = "/{(/w+)/}"              '变量名有效
        case 1 regEx.Pattern = "/{([/w+/-/*///<>=]+)/}" '变量名及运算符有效
        'case 2 regEx.Pattern = "/{([/w/s]+)/}"   '除换行符外的所有字符有效
        case else exit function
    end select
    'regEx.Pattern = "/{(/w+)/}"
    regEx.IgnoreCase = true
    regEx.Global = true
    Set Matches = regEx.Execute(str)
    Result = str
    'response.write Matches.Count
    For Each Match In Matches
        Result = Replace(Result, Match.Value, GetVar(Match.SubMatches(0)))
    Next
    set Matches = nothing
    set regEx = nothing
    Txt2Value = Result
end function

function Var2Value(var_name)
    Var2Value = Txt2Value(var_name, 0)
end Function

调用方法:
Var2Value("update users set password='{password}', group={group}, name='{username}' where account='{account}'"
  Var2Value调用了Txt2Value,Txt2Value找出所有变量名交调用GetVar得到变量值并进行替换。实际上直接调用Txt2Value(str,1)还允许对字符串值进行四则运算。

 

[asp]asp function 设置全局变量|function变量共享

使用dim定义实现全局变量,如做分页的时候 在最顶部设置 dim rc function rs_news() rc="asdf" end function function write_fun()  ...
  • luo2635505
  • luo2635505
  • 2015年04月13日 15:38
  • 623

ASP中轻松实现变量名-值变换

用过PHP的朋友都知道,PHP中变量的使用灵活方便,特别是能在字符串中方便实现变量名-值变换,使得整个PHP代码更显简洁优美。比如一条更新数据库的SQL语句只需写成:"update users set...
  • u014739775
  • u014739775
  • 2014年05月10日 10:37
  • 651

asp.net中如何定义全局变量

1、在global.asax中使用application对象定义的静态变量;代码如下:public static float somevar=somevalue;2、用asp.net的Session缓...
  • tuwen
  • tuwen
  • 2008年01月14日 11:20
  • 10172

C#变量-命名规则

变量的命名基本规则:(1)变量名的第一个字符必须是字母,下划线("_")或@(2)其后的字符可以是字母,下划线或数字。另外,一些关键字对于C#编辑器而言有特定含义,如果错误使用其中一个关键字,编译器会...
  • jingrenhai
  • jingrenhai
  • 2007年01月13日 10:56
  • 5881

Python:如何将字符串作为变量名

版权声明:非技术文章禁止转载,如有需要请私信作者。技术类文章欢迎转载,转载请注明出处: http://blog.csdn.net/ztf312/ 一共三种方法: [...
  • qq_15013233
  • qq_15013233
  • 2016年08月30日 15:23
  • 3986

c 中变量、变量名、变量地址、指针、引用等含义

变量名,对象名的含义
  • DdheiheiB
  • DdheiheiB
  • 2015年02月07日 21:47
  • 605

ASP微信获取用户信并存入ASP变量

  • 2017年08月30日 19:43
  • 46KB
  • 下载

ASP.NET里的变量命名规则

变量命名规则:Array----arrBoolean----blnByte-----bytChar-----chrDatetime-----dtmDecimal-----decDouble-----d...
  • lyg__wangjian
  • lyg__wangjian
  • 2011年04月23日 15:35
  • 685

Python:如何将字符串作为变量名

一共三种方法:>>> var = "This is a string" >>> varName = 'var' >>> s= locals()[varName] >>> s 'This is a st...
  • ztf312
  • ztf312
  • 2016年04月11日 15:37
  • 11097

教你彻底解决Eclipse自动补全变量名的问题

from:http://tieba.baidu.com/p/2466687622 大家使用eclipse或者MyEclipse敲代码的时候,是不是都被这样一个问题困扰着。就是你键入一个变量名的时候,...
  • peterXu00800
  • peterXu00800
  • 2017年02月23日 16:25
  • 2567
内容举报
返回顶部
收藏助手
不良信息举报
您举报文章:ASP中轻松实现变量名-值变换
举报原因:
原因补充:

(最多只允许输入30个字)