VBScript/ASP Classic：避免函数参数与全局变量命名冲突

针对老旧ASP应用中函数参数与全局变量重名、修改参数意外篡改全局变量的问题，除了复制到局部变量的方案外，还有以下更优雅的解决思路：

1. 强制参数按值传递（最直接方案） #

VBScript默认参数是按引用传递的，这意味着函数内的参数本质是全局变量的引用，修改参数会直接改动全局变量。在参数前添加ByVal关键字，可将参数改为值传递——函数内的参数会成为全局变量的副本，修改副本不会影响原全局变量，无需额外声明局部变量。

示例代码：

Function MyFunction(ByVal foo)
    foo = foo & "123"
    MyFunction = foo
End Function

2. 开启Option Explicit减少隐式全局变量 #

老旧系统中大量未用Dim声明的变量会自动成为全局变量，这是重名问题的核心根源之一。在每个ASP页面顶部添加Option Explicit，强制所有变量必须显式声明，能提前发现未声明的隐式全局变量，大幅降低未知的重名风险。

示例：

Option Explicit
Dim foo : foo = "bar" ' 必须显式声明变量

3. 给全局变量加命名前缀/封装到类（长期重构方案） #

若有精力逐步优化系统，可通过命名规则或封装彻底隔离全局变量与函数参数：

• 前缀方案：给所有全局变量统一添加前缀（如g_），从命名上区分全局与局部/参数变量：

  Dim g_foo : g_foo = "bar"
  
  Function MyFunction(foo)
      foo = foo & "123"
      MyFunction = foo
  End Function
  

• 类封装方案：将全局变量封装到类实例中，通过类属性访问全局变量，彻底避免命名冲突：

  Class GlobalState
      Public foo
  End Class
  Set g_State = New GlobalState
  g_State.foo = "bar"
  
  Function MyFunction(foo)
      foo = foo & "123"
      Response.Write g_State.foo ' 与参数foo完全隔离
      MyFunction = foo
  End Function
  

4. 函数参数统一加命名前缀 #

与全局变量前缀思路相反，给所有函数参数添加统一前缀（如p_），简单直接地从命名上区分参数与全局变量，无需改动全局变量代码。

示例：

Function MyFunction(p_foo)
    p_foo = p_foo & "123"
    MyFunction = p_foo
End Function

内容的提问来源于stack exchange，提问作者Virus721