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

質問編集履歴

5

修正

2019/09/08 11:10

投稿

Reach
Reach

スコア735

title CHANGED
File without changes
body CHANGED
@@ -86,10 +86,10 @@
86
86
 
87
87
  回答者の方のアドバイスにより
88
88
  以下のように したのですが
89
- 動作しません
89
+ 動作しません (再度修正)
90
90
 
91
91
  ```vbs
92
- scr = scr + " <script type='text/javascript'> "
92
+
93
93
  scr = scr + " var createSelectBox = function (){ "
94
94
  scr = scr + " var arr = [ "
95
95
  scr = scr + " {val:'01', txt:'ポチ'}, "
@@ -106,7 +106,6 @@
106
106
  scr = scr + " document.getElementById('sel1').appendChild(op); "
107
107
  scr = scr + " } "
108
108
  scr = scr + " }; "
109
- scr = scr + " </script> "
110
109
 
111
110
  ' ユーザーIDとパスワードの入力ボックスと、ボタンを表示
112
111
  html = ""

4

再修正

2019/09/08 11:10

投稿

Reach
Reach

スコア735

title CHANGED
@@ -1,1 +1,1 @@
1
- 【Javascript】【vbs】実行されない?
1
+ 再修正【Javascript】【vbs】実行されない?
body CHANGED
File without changes

3

修正2

2019/09/08 11:06

投稿

Reach
Reach

スコア735

title CHANGED
File without changes
body CHANGED
@@ -82,4 +82,50 @@
82
82
  + "userid: " + userid + vbcrlf _
83
83
  + "passwd: " + passwd
84
84
  end if
85
+ ```
86
+
87
+ 回答者の方のアドバイスにより
88
+ 以下のように したのですが
89
+ 動作しません
90
+
91
+ ```vbs
92
+ scr = scr + " <script type='text/javascript'> "
93
+ scr = scr + " var createSelectBox = function (){ "
94
+ scr = scr + " var arr = [ "
95
+ scr = scr + " {val:'01', txt:'ポチ'}, "
96
+ scr = scr + " {val:'02', txt:'タマ'}, "
97
+ scr = scr + " {val:'03', txt:'モモ'} "
98
+ scr = scr + " ]; "
99
+ scr = scr + " for(var i=0;i<arr.length;i++){ "
100
+ scr = scr + " alert(arr[i].txt); "
101
+ scr = scr + " } "
102
+ scr = scr + " for(var i=0;i<arr.length;i++){ "
103
+ scr = scr + " op = document.createElement('option'); "
104
+ scr = scr + " op.value = arr[i].val; "
105
+ scr = scr + " op.innerText = arr[i].txt; "
106
+ scr = scr + " document.getElementById('sel1').appendChild(op); "
107
+ scr = scr + " } "
108
+ scr = scr + " }; "
109
+ scr = scr + " </script> "
110
+
111
+ ' ユーザーIDとパスワードの入力ボックスと、ボタンを表示
112
+ html = ""
113
+ html = html + " <form> "
114
+ html = html + " <input type='hidden' name='CLICKED' value='false'/> "
115
+ html = html + " User ID: <input type='text' name='USERID'/> </br>"
116
+ html = html + " Password: <input type='password' name='PASSWD'/></br> "
117
+ html = html + " <select id='sel1'></select> "
118
+ html = html + " <input type='button' value= 'ボタン' onclick='createSelectBox();' /> "
119
+ html = html + " <input type='button' onClick = ""getElementsByName('CLICKED')(0).value = 'true';"" value='OK' /> "
120
+ html = html + " </form> "
121
+ wscript.echo scr
122
+ GuiIE.Document.Body.InnerHtml = html
123
+ script = GuiIE.Document.createElement("script")
124
+ script.innerHTML = scr
125
+ GuiIE.Document.Body.appendChild(script)
126
+ GuiIE.Document.Title = "VBScript GUI test."
127
+ wscript.echo html
128
+ ' ボタンがクリックされるまで待つ
129
+ on error resume next
130
+
85
131
  ```

2

修正

2019/09/08 10:34

投稿

Reach
Reach

スコア735

title CHANGED
File without changes
body CHANGED
@@ -2,8 +2,8 @@
2
2
 
3
3
  以下のVBScriptを実行しても
4
4
  Javascriptが 機能していないみたいなのですが
5
- htmlの内容を .htmlファイルにして IEに D&Dすると
5
+ htmlの内容を .htmlファイルにして IEに D&Dして "ボタン"を押下すると
6
- 動作するのします
6
+ 動作します (aleat表示、アイテム追加)
7
7
 
8
8
  何がいけないのでしょうか?
9
9
 

1

誤字修正

2019/09/08 06:04

投稿

Reach
Reach

スコア735

title CHANGED
@@ -1,1 +1,1 @@
1
- Ⓙavascript】【vbs】実行されない?
1
+ Javascript】【vbs】実行されない?
body CHANGED
File without changes