vbsからvbsへ変数の中身を渡したい

Question

前提・実現したいこと

vbsからvbsへ変数の中身を渡したい。

発生している問題・エラーメッセージ

')'がありません。
コード:800A03EE

該当のソースコード

Dim pas
Dim objWsh
Dim return

pas = WScript.Arguments(0)
Set objWsh = WScript.CreateObject("Wscript.Shell")

return =objWsh.Run(".\vbs\read.vbs" pas,,True)

試したこと

以下に記載されていること試したのですが構文エラーになりました。
https://oshiete.goo.ne.jp/qa/9204542.html
文字連結になってしまい、変数が文字列になってしまう。

Comments

[otn]

> 以下に記載されていること
記載されていることを全然やってませんね。

[okusan]

URL記載のコードを試したところ
違ったエラーが出たため試す前のコードを記載しました。

Answer 1

文字連結になってしまい、変数が文字列になってしまう。

コマンドラインパラメーターとしてしか渡せないので文字列で構いません。というか文字列でしか渡せません。

return =objWsh.Run(".\vbs\read.vbs "&pas,,True)

として
read.vbsで、以下のように取得してください

if WScript.Arguments.Count <> 1 then
    WScript.echo("usage: read.vbs pas")
    WScript.Quit(-1)
end if
dim pas
pas = WScript.Arguments(0)

Comments

[okusan]

ご回答ありがとうございました。
>コマンドラインパラメーターとしてしか渡せないので文字列で構いません。というか文字列でしか渡せません。
そう言う事だったんですね。。
無事vbs間で渡す事に成功しました。ありがとうございました。