JS在后台怎么运行~~谢谢了，帮我改正一下，

Question

写了一个类Public Class EditWord
    Inherits System.Web.UI.Page
    Public Function editWord(ByVal WordUrl As String)
        Dim sJSCode As New System.Text.StringBuilder
        Dim JSCode As String = "openDocObj = new ActiveXObject(" + "SharePoint" + ".OpenDocuments.2" + ");"
        sJSCode.Append(" <script language=""javascript"">" & vbCrLf)
        sJSCode.Append("&JSCode&" & vbCrLf)  ''''这里好像有问题，我不知怎么使这个成为一个变量 
        sJSCode.Append(" openDocObj.EditDocument(" + "WordUrl" + ");" & vbCrLf)
        sJSCode.Append(" </script>" & vbCrLf)
        RegisterStartupScript("MyJSCode", sJSCode.ToString)
    End Function
End Class
调用类  Dim mywordUrl As String = "http://localhost/111.doc"
        Dim myWordClass As New EditWord
        myWordClass.editWord(mywordUrl)
目的是想实现：<script language="JavaScript" type="text/JavaScript">
openDocObj = new ActiveXObject("SharePoint.OpenDocuments.2"); // 为了兼容Office XP，可以创建
openDocObj.EditDocument("http://localhost/111.doc");
</script>麻烦帮我改正一下，谢谢了~~~~~

Answer 1

Dim JSCode As String = "eval(\"openDocObj = new ActiveXObject('SharePoint.OpenDocuments.2')\");"

Answer 2

sJSCode.Append("var openDocObj = new ActiveXObject(\"SharePoint.OpenDocuments.2\");") // 为了兼容Office XP，可以创建