VBS将MS Access DB连接变量传递给HTA

时间:2017-07-07 17:46:13

标签: vbscript parameters database-connection connection-string hta

我有一个HTA(1)文件,我称之为另一个HTA(2)文件。我想在第一个文件中打开一个数据库连接,然后在第二个文件中引用它以保存到数据库的冗余连接。

我知道如何将字符串变量从HTA(1)传递给HTA(2),但是我无法将连接变量设置为传入的字符串值。这是一些代码......

HTA(1):

CreateObject("WScript.Shell").Run Chr(34) & "C:/Users/******/Desktop/Cycle Mapping Menu.HTA" & Chr(34) & " #" & objConn &"#"

我使用#来分隔。 objConn是连接变量。连接有效,我可以用它与数据库通信。

在接收方......

HTA(2):

<html>
<head>
    <HTA:APPLICATION ID="myhta" APPLICATIONNAME="FSTRUC Mapping Interface">
    <title>FSTRUC Mapping Interface</title>
    <script language="vbscript">

     a = Split(myhta.CommandLine, "#")
    msgbox myhta.commandline

    for x = 0 to 1
        if trim(a(x)) <> "" then
            msgbox x & " " & a(x)
        end if
    next

    Set objConn = a(1)

代码在'Set objConn = a(1)'

上失败

感谢您的帮助!

0 个答案:

没有答案