teratail header banner
teratail header banner
質問するログイン新規登録

回答編集履歴

3

追記

2019/12/06 08:40

投稿

Y.H.
Y.H.

スコア7918

answer CHANGED
@@ -1,3 +1,7 @@
1
+ > 文字連結になってしまい、変数が文字列になってしまう。
2
+
3
+ コマンドラインパラメーターとしてしか渡せないので文字列で構いません。というか文字列でしか渡せません。
4
+
1
5
  ```vbscript
2
6
  return =objWsh.Run(".\vbs\read.vbs "&pas,,True)
3
7
  ```

2

誤記修正:+ ⇒ &

2019/12/06 08:40

投稿

Y.H.
Y.H.

スコア7918

answer CHANGED
@@ -1,5 +1,5 @@
1
1
  ```vbscript
2
- return =objWsh.Run(".\vbs\read.vbs "+pas,,True)
2
+ return =objWsh.Run(".\vbs\read.vbs "&pas,,True)
3
3
  ```
4
4
  として
5
5
  read.vbsで、以下のように取得してください

1

誤記修正

2019/12/06 08:37

投稿

Y.H.
Y.H.

スコア7918

answer CHANGED
@@ -3,12 +3,11 @@
3
3
  ```
4
4
  として
5
5
  read.vbsで、以下のように取得してください
6
- ```
6
+ ```vbscript
7
- dim pas
8
7
  if WScript.Arguments.Count <> 1 then
9
8
  WScript.echo("usage: read.vbs pas")
10
9
  WScript.Quit(-1)
11
10
  end if
12
-
11
+ dim pas
13
12
  pas = WScript.Arguments(0)
14
13
  ```