从asp迁移到asp.net时删除set时出错

Question

我正在将一个项目从asp转换为aspx，我只是将页面从asp转换为aspx并修复错误(如在http://msdn.microsoft.com/en-us/library/ms973813.aspx中提到的)，因为我的客户不想让我转换整个东西。

我有一个包含在登录.asp中的文件x.asp

这是我的原始代码(x.asp)

function AddX( DX, Parent, Name, Value )    
    Set AddX = AddXEx( DX, Parent, Name, Value, "" )    
End Function

function AddXEx( DX, Parent, Name, Value, Namespace )    
    dim obj    
    set obj = DX.create( 1, LCase(Name), Namespace)    
    if Len(Value) <> 0 then    
        obj.text = Trim(Value)    
    end if    
    Parent.appendChild obj    
    set AddXEx = obj    
End Function  
%>    

我删除了set并添加了script language = "vbscript“runat = "server”，这是我进行更改后的代码(x.aspx)

 function AddX( DX, Parent, Name, Value )              
     AddX = AddXEx( DX, Parent, Name, Value, "" )          
 End Function          

 function AddXEx( DX, Parent, Name, Value, Namespace )          
     dim obj            
     obj = DX.create( 1, LCase(Name), Namespace)          
     if Len(Value) <> 0 then    
         obj.text = Trim(Value)     
     end if     
     Parent.appendChild obj     
     AddXEx = obj     
End Function    

这是我在编译时得到的错误

`编译器错误消息: BC30057：'Public Function AddXEx(DX As Object，Parent As Object，Name As Object，Value As Object) As Object‘的参数太多。

源错误: AddX = AddXEx( DX，Parent，Name，Value，"“)`

请告诉我怎么解决这个问题

提前感谢！

Answer 1

对于ASPX，你应该把你的@page指令改成Language="VB"和Explicit="True"，而不是VBScript和Option Explicit，因为这是典型的ASP：

<% @Page Language="VB" Explicit="True" %>