X

HTAをもっと流行らせる計画 Part2

■ このスレッドは過去ログ倉庫に格納されています
2008/09/08(月) 20:53:35

過去スレ・関連スレ


HTA研究会
http://piza2.2ch.net/tech/kako/996/996763278.html

Web制作板のHTAスレ
http://pc8.2ch.net/test/read.cgi/hp/1068286485/

HTAをもっと流行らせる計画
http://pc11.2ch.net/test/read.cgi/tech/1124559962/
2010/05/04(火) 22:49:51
作者に聞けば？
400398
垢版 |
2010/05/04(火) 23:56:31
onclockじゃねえや、onclickだったorz
2010/05/05(水) 14:03:55
作者と同レベル
2010/05/05(水) 19:30:57
>>399
本人だろ
2010/05/07(金) 16:38:04
>>398
onmoune→onclickだけで動いた
script要素はhtml要素の外でもいいみたい
2010/05/07(金) 22:01:17
なんか見ないほうが良さそうなサンプルだにゃあ
2010/05/08(土) 00:25:33
>>397,403
script要素をhtml要素の外に書いてるコードなんて初めて見た。
こんなクソコード真似しちゃ駄目だよ。
2010/05/08(土) 15:40:50
それほどおかしくないよ
<html>
<body>
あいうえお
</body>
</html>
<html>
<body>
かきくけこ
</body>
</html>
をひらいてみ
2010/05/08(土) 16:57:01
いいえ、おかしいです
2010/05/08(土) 17:13:21
>>406
仕様上正当なのか、たまたま動いてるだけなのかは区別しような。
2010/05/08(土) 17:22:49
たまたまじゃないだろ
2010/05/08(土) 23:15:02
たまたまだよ。

「html要素はHTML文書中に一つだけ」と規格で決まってる。
IEは規格からかなり外れたHTMLも無理矢理表示する傾向があるから
表示されてしまうけど、HTML文書としては完全に間違い。

規格を読むなり
ttp://validator.w3.org/ や
ttp://openlab.ring.gr.jp/k16/htmllint/htmllint.html で
チェックするなりした方がいい。
2010/05/08(土) 23:26:36
確率論において、2つの事象が独立であるというのは、ある事象と別の事象の両方が成立する確率が、
それぞれの確率の積で表わされることを言う。2つの確率変数が独立であるというのは、「ある確率変数
の値が一定範囲に入る事象」と「別の確率変数の値が別の一定範囲に入る事象」が、考えられるどのよ
うな「一定範囲」（「考えられる」とは通常ボレル集合族を指す）を定めても、事象として独立であることを言う。
二つの事象が独立といった場合は、片方の事象が起きたことが分かっても、もう片方の事象の起きる確率
が変化しないことを意味する。二つの確率変数が独立といった場合は、片方の変数の値が分かっても、
もう片方の変数の分布が変化しないことを意味する。
2010/05/09(日) 02:41:26
すれ違い
2010/05/21(金) 17:01:03
>>393
exec("cmd")はコンソール開くから使いたくねぇな
2010/05/22(土) 17:53:12
run("cmd",0)だな
2010/05/26(水) 14:13:24
exec("cmd",0)
2010/06/10(木) 17:12:50
特定のウェブページを、Chromeスタイルで表示してくれる、Internet Explorerの拡張機能「Google Chrome Frame」がnew ActiveXObjectに対応してくれれば
html5のhtaが作れるのに・・・
2010/06/30(水) 15:11:59
HTA？なんぞそれ？と思って調べてみたらいいねこれ　
VBSctipr JavaScript HTML Perlも使えるとは

と　最初はよかったんだ　最初は・・・


HTA入門のページを見て　簡単なHTAを作ってみようと思って　
少し前作っていたWSHのソースをHTAのソースにコピペして　ボタンクリックで実行したらエラー連発

ググってみたらWSHは一部の機能が使えないとか
Wscript.sleepだの Wscript.echoが使えないとか・・・orz
2010/06/30(水) 15:17:51
>>417
Wscript.echo は alertで代用できるからいいけどsleepが代用できないという

var WScript;
WScript = WScript.CreateObject("WScript.Shell");

も動かないとかもうね・・・
HTAはWSHを使う人にはとっつきにくいのかもね
2010/06/30(水) 16:50:55
DOSのバッチでSleepはPingで代用できるけどそういうことできない？
420デフォルトの名無しさん
垢版 |
2010/06/30(水) 17:20:30
>>418
それ、wshの .js でも動かないだろｗ
---------------------------
エラー: 'WScript' は Null またはオブジェクトではありません。
---------------------------


<script language="JScript">
var WScript;
WScript = new ActiveXObject("WScript.Shell");
</script>

<script language="VBScript">
Dim WScript
Set WScript = CreateObject("WScript.Shejll")
</script>

sleepはフリーズするから嫌われるぞ。
window.setTimeoutでごまかすか、時間のかかる処理は外部プロセス起動するといい。
2010/07/01(木) 02:51:03
>ググってみたらWSHは一部の機能が使えないとか
その一部以外の機能は何？
2010/07/01(木) 03:06:13
えっ？
2010/07/01(木) 03:17:46
>>429
Win32_PingStatus
2010/07/01(木) 17:14:57
' これは単に短い遅延を作成するためのスリープ関数です。
Sub Sleep(tmpSeconds)
Dim dtmOne,dtmTwo
dtmOne = Now()
While DateDiff("s",dtmOne,dtmTwo) < tmpSeconds
dtmTwo = Now()
Wend
End Sub
2010/07/05(月) 16:32:36
popupで代替
2010/07/13(火) 17:05:55
HTAからWScriptへアクセスしてみた
ttp://dara-j.asablo.jp/blog/2007/06/05/1557869
2010/07/15(木) 21:50:23
で？やめた？
2010/07/20(火) 14:06:48
ExitCode設定できないぃー！
2010/07/25(日) 14:57:44
HTAならスリープはタイマで代用すればいいと思う。
2010/07/25(日) 18:44:58
HTA でスクリプトを一時的に停止する方法はありますか
http://www.microsoft.com/japan/technet/scriptcenter/resources/qanda/mar06/hey0330.mspx
2010/08/29(日) 20:32:30
ファイルパスをイチイチエスケープするのが死ぬほどめんどいけどjsベースじゃどうにもならんの？

<span id="RawVar" style="display:none;">
<span name="hoge">val</span>
<span name="md">c:\windows\com</span>
</span>
function getElements(){
var elements = document.getElementById("RawVar").getElementsByTagName("span");
var kekka={};
for(var i=0;i<elements.length;i++){kekka[elements[i].name]=elements[i].innerText;}
return kekka;
}
こういう力技じゃないとダメ？
2010/08/29(日) 23:36:27
>>431
面倒になるくらい定義があるなら、.INIファイルライクな外部ファイルにするとか、
そうでなければ定義部分だけVBScriptにしてみるとか
<html>
<head>
<script language="VBScript">
path = "c:\dir1\dir2"
</script>
</head>
<body onLoad="window.alert(path)">
</body>
</html>
2010/08/30(月) 00:12:54
>>432
サンクス。
2010/08/30(月) 01:12:01
'c:/windows/com'.replace(/\//g, '\\')
2010/09/16(木) 07:03:29
IE9入れたらmshtaが軽くなってユーザーcssを読み込まなくなってた
2010/09/16(木) 22:06:11
窓枠が太い見た目強制になったみたいだね
あと、window.onload 直前まで背景が灰色
2010/09/26(日) 17:17:28
SFUのGUIが全部htaって電波が受信された
2010/09/28(火) 06:30:47
c:\> mshta "javascript:new ActiveXObject('InternetExplorer.Application');"
って感じでHTA＋IEオブジェクトの使い方が紹介されてたんだけど
これだと裏で起動する普通のIEが取り残されるんだよね。

表示したら分かる。
c:\> mshta "javascript:var ie = new ActiveXObject('InternetExplorer.Application'); ie.visible = 1"

何パターンか試してみたんだけど
c:\> mshta "javascript:alert('aa');"　// OK。HTAだけで処理される
c:\> mshta "javascript:alert(this);"　// OK。HTAだけで処理される
c:\> mshta "javascript:this.window.moveTo(0, 0);" // ok

navigate とかしようとすると・・IEが起動される。
c:\> mshta "javascript:window.navigate('http://www.google.co.jp/');"
c:\> mshta javascript:window.navigate('javascript:alert("aa");');

どうやったらOLEオブジェクトを取得できるんだろうかと思っていたけど
>>335 でとっくの昔に答えがあった。
2010/09/28(火) 20:39:32
410-411
のhtaEx.exeがうまく動作しない……。
一度目の起動はうまくいくんだけど二度目以降は正常に動作しない。
htaのウインドウが非アクティブになるからhtaEx.exe自体は実行されてる様なんだけど。
htaEx.exeがウインドウをみつけられてない？
OSを再起動すればまた上手くいくようになる。
解決策あれば教えてください。
2010/09/29(水) 21:46:15
>>439
うん、よく外すよね。よく分からんけど。

それより、久しぶりに動かしてみたら透明色が効かなくなってるし･･･
aero止めたら動くけど･･･ie9にしたせいかな？


その後いろいろいじって見たのがあるんで貼っとこうかー。
今回は "HTML Application Host Window Class" にのみアタックします。
そのほかの細かいことはもう忘れました。

ちなみに下記の ErrorLevel を返します。れっつエンジョイデバッグ！
0: やることはやって終了。
1: コマンドラインパラメーターが変。
2: 親プロセスのPIDが取得できない。
3: 親プロセスのHTAウィンドウが見つからない。
4: SetWindowLong()が失敗。
5: SetLayeredWindowAttributes()が失敗。
2010/09/29(水) 21:47:57
<html><head><script>function E(s,v){
function R(a,i){var c=a[i].charCodeAt(0)-65377;if(c<0)o.push(a[i]);else{R(a,c*=2);R(a,c+1);}}
var i,o=[],X=ActiveXObject,a=s.replace(/\s/g,"").split(""),f=new X("Scripting.FileSystemObject"),
p=f.GetSpecialFolder(2)+"\\htaEx.exe",d=new X("Microsoft.XMLDOM").createElement("x");
for(i=126;i<a.length;i++)R(a,i);d.dataType="bin.base64";d.text=o.join("");
with(new X("ADODB.Stream")){Type=1;Open();Write(d.nodeTypedValue);SaveToFile(p);}
new X("WScript.Shell").Run('"'+p+'" '+v,0,1);f.DeleteFile(p);}</script></head><body>
htaEX.exe <input id=cmd value="/a:200 /c:00FFFF"><button onclick="E(dat.value,cmd.value)">
Exec</button><p>/a: アルファ値(0-255)<br>/c: 透明色(RRGGBB)<br>/t: 最前面表示<br>/b: 最背面表示<br>
/m: ミニタイトルバー<br>/t- /b- /m-: 解除<br><p><div style="width:200;height:200;background-color:#00FFFF">
#00FFFF</div><input id=dat style="display:none" value="
AA｡｡｢｢｣｣､､｡A･･//ｧｧ｢ACBE｡｡B｡D｢ｦ｡CVzIgQAIQZGIｬ8V/FjUbmｫ｡I｡M8Y2BAycD7+3ldaWｩｩgｳFNDr1BYXAUl0AEdAJfVGLRwB
Ahｴ｡ｲ｡GFｺRuｵJvｱczMｦEAQCQBｪTVqﾜ｢E｢ｨ8｡Lg｣ﾝ･｣ｯ0｢LgBTM0hｩ､｣gQ､｣ｯFBFｭMﾝIAIhmjT｣ｦ4ｮﾝsBﾞｭg｢QｯDiEwｦﾟgｪEｦﾟCｦF
｣｡U｣ｮｪE｣Ag｡hﾜﾜ｢｡QｦQ｣E｣ｯvCｦFｧ･､AgｭU･｢LnRleHQ｢cB｢ﾟG｢B､ｦIｦYC5yｵF0YQ｡2AI｢g｢ﾟo､｡Eﾜﾅﾅｩ｣ｦGpAaｲﾆBoVｻGoA/xVIｶ
w1WL7IHsLAｼﾇWｱPbx4XU/fｨLAｼPｷEｻIv4V2oC6NkDｰL8IP+/3UEｽﾈOｾF1P3ｨﾉW6LsDｮrFTm93P3ｨ3QTjﾊU/fｨUFbongM｡IXAdefr
Boud7P3ｨ1bｸｳﾆCLw19eW8nDVYvsg+xAakCNRcBQ/3UI/xUsｶgH3｡HUEｽDJw2pAｹXﾋP91CPｷTｻGiYｶｹXﾋPｷFｻPfYG8ｿﾀOLVﾞEﾁcKｽ
BmhcﾌJFZqMF5mOｸ3EGaD+Tl3CmvACgﾂyY1ECNBﾞgﾂCmaFyXXeXsOLVﾞEﾁcKｽBmhcﾌWVZqMF5mOｸ3E2aD+Tl3DYPA/QﾂﾀHgｿPB6zJ
2010/09/29(水) 21:48:47

qQV5mOｸ3EmaD+UZ3DAﾂﾀHgBI1ECMnrGGphXmY78XcQZoP5ZncKﾁfJweﾍｹQIqUJCﾁcKZoXJdalew1WL7FZXi30IｹUIUFfｸTAﾆCLdQ
yLBjtFCHUSV+j+/vｨWﾊAﾎeﾏgQzwOsDｽｿX15dwggAVYvsUﾐﾑQiDTfz/iUX4ｹX4UGhlEU｡/xU0ｶi0X8ﾀNVi+yﾁCCDTeD/ｱP/g30IAo
l98MZF5P+ﾏeyﾏfyﾏfiﾏfR9DegV/vｨｽｿ6eﾒｭTVjP2Rjl1CIvGiUXouwｰ｡PjhﾒｭqLV+LTQyLBIFmgzgvD4Xy｢ﾁdIAoP5ﾊ8+ﾎiD6UF0
A0nrNwﾂSARmg/k6dR2DwAZQ6Ib+ｨ9ZiEXkPP90EQﾃ/INN9ALppgｦGY7z3UjCV346ZkｦCD6WJ0fkﾌQoPpCnQlg+kED4SD｢g+kDﾎWJ
dfﾈeTPJZjl4ｿ+VwY1MCf+JTezrZ2Y5eAR1CYﾇ+I｢ﾈWIﾇ/I｢ﾈTwﾂSARmg/k6dZ+DwAZQ6Dv+ｨ8JXfxZi8jB6RAPttｫ4f8ｦDB4hALy
iUA/wｰ8gJdfSJTeﾈFmY5eAR1CYﾇ+ｪjrB4ﾇ/ｪiﾑehAO0UIiUXoD4wAｨｨ6wOJdfCDff｡ﾎzo4vzｨ4vG6bg｢z/+jp/PｨO8dﾉGoC62RQ6
GP+ｨ+L+FmDｨ9ﾉGoD61Kﾑfgﾑfx0UGrsV/ｷRｻIvwi0X499AjxglF/P91/GrsV/ｷQｫｮvwﾎRqBOshhV38dB+DffｳdBn/dfT/deT/deBX
/xU8ｶhcBﾉWoFWOtCM/ｵOXXsdQWDyP/rIPdF/ｪh0CvZF/ﾓﾉIvG6w2Dfez/dQVq/ljrAjPAaDN｢zyVFRUVFQV/ｷOｫｮPAXltfﾀNVi+x
RｹX8UPｷHｻFDｸSQﾆBQ/3X86MD9ｨ9ZWVDｸRgﾆDM/yUEｶ/yUIｶ/yUMIEﾅﾅｩｯGﾓｭuﾔgCｬJIhｰuﾔxCｬNﾓｮeｴｯLYi｣HCIｰ4iｭKﾕWCｼGgiｰ
GﾕmCｼP4hｦMｲｯHｱYWdlOiBodﾖFeｫbL2E6Mｹ1XSBbL2M6UlJHR0JCXSBbL3RdIFsvYﾌgWy9tXQ｢BodﾖFeｫ2ZXIuMS4wMw｡SFRNTｫBc
HBsﾄNhdGlvbiBIb3N0IFdpﾗvdyBDbﾖzcwｮCE｣ｪ8CE｢gｦ4ｴ｣｢CqﾕLCｦDﾓ｣ｪMwiｦkI､｣ｪBgﾔbiｬIﾓｰSﾔriｬMQhｮQﾔ3iEｯC2ｲｯBwiｦu
ﾕSiｼFgiｭoﾕhiｼJgiｮ+ｴｮCIｯBDﾍNsb3NlSﾖﾘxlﾍYDUHﾙｾﾚﾛyTmV4dFc｡EQDUHﾙｾﾚﾛyRmlﾀ3RXAKwﾝ3JlﾊRlﾐ9vbGhlbHAﾛlNuﾊBza
G90ｰqﾋdﾃEN1cnJlbnRQcm9jZXNzSWｳqQRsc3Ryｾ1wQQｭAFFeGﾌUHﾙｾﾚﾒwﾋdﾃENvbW1hﾗMﾄ5lVﾒﾑVJORUwﾛi5kbGw｡PgBTWﾚ2FnZU
ﾙeEEACgFHZXRDbﾖzc05hbWVｿIﾒR2V0V2lﾘ93ﾐV4dEｬJABR2V0V2lﾘ93ﾐhyZWFkUHﾙｾﾚ0lkｮrﾍVudW1Xﾄ5kb3dzAKcCU2V0V2lﾘ93
UG9zｭ+AlNﾃExheWVyZWRXﾄ5kb3dBdHRyﾄJ1dGｱｰlAlNﾃFdpﾗvd0xvｺdXｰCﾋdﾃFdpﾗvd0xvｺdXｭVU0VSMzIﾘxsｦHﾍNvbW1hﾗMﾄ5lﾐ
9Bcmd2Vw｡U0hFTEwﾛi5kbGwﾅｩ｣｢="></body></html>
2010/10/01(金) 15:46:02
>>440-442
透過pngがうまくいかない
2010/10/01(金) 16:47:51
と思ったけど、1色のみの透明化だから当然か。
素直にAdobe AIRとかに移行しようかな
2010/10/02(土) 01:07:21
>>440
Win 7 64bit + IE8で、
ErrorLevelとやらが表示されなかったのでおそらく起動すらしなかったと思われ
2010/10/02(土) 12:36:46
>>445
ErrorLevelの取得と表示は紙面の都合上掲載しておりません。あらかじめご了承ください。
64bit環境は今無いのでこちらではテストできません。する気もありません。あらかじめご了承ください。
ErrorLevel=1 の時だけMsgBoxを表示する糞仕様なのでパラメータを空にしてやれば起動確認ぐらい出来るかな？
2010/10/17(日) 21:45:51
俺がいじることのできない場所のページをiframe内に表示してる関係上
<meta http-equiv="MSThemeCompatible" content="yes">
が追加できないんだけど、そういう場合どうすればビジュアルスタイルが適用できる？
iframeにapplication=yesってやってDOMでheadにmeta追加しようとしてもうまくいかないし。
2010/10/18(月) 17:07:54
MHTMLにして書き換える
2010/10/18(月) 19:51:46
>>448
Ajax使ってるページだからローカルに保存できない
2010/10/18(月) 23:56:32
>ローカルに保存できない ←努力が足りない。
2010/10/19(火) 00:02:24
451に完全に同意
2010/10/19(火) 00:23:48
firefox+firebugで一発なんだが
2010/10/25(月) 20:24:56
いつもこのスレで何か聞こうと思って
その前によく調べようと思って、よく調べると
何だかんだで答えが見つかってしまって
結局聞かない。
2010/10/25(月) 20:45:03
HTA(+JScript)で、ウィンドウを閉じる時に処理させる
何か良い方法は有りますか？
（まぁ「閉じますか？」って確認ダイアログ出したいだけ）

独自の閉じるボタンを作って処理させても
Alt+F4で消されると対処できない。
仕方が無いのでAltを無効にしたんですが
こうするとAlt+Tabが使えないと苦情が来る。
2010/10/25(月) 21:45:28
>>454
無理じゃないかな
onBeforeUnload()イベント使えば、閉じられるのを検知はできるし、
メッセージも表示できると思うけど、閉じるのをキャンセルはできないと思う
2010/10/25(月) 23:02:37
>>455
Gmail で編集中の画面から移動しようとすると「移動しますか?」って聞かれてキャンセルも可能なのは何故なんだぜ?
同じ方法が HTA にも適用できるはずなんだぜ。…原理的には。

おっと詳しいことは俺に聞くなよ。
2010/10/25(月) 23:19:50
>>456
いや、ページ移動のキャンセルはできてもブラウザを閉じるのは抑止できなかったんじゃないかと
ブラウザが閉じられるのを制御できたら、ブラウザを閉じることのできないブラクラが作成可能って
ことになるけどそれはないだろうと
2010/10/25(月) 23:21:43
>>457
そりゃそうだ。これはアンタがただしいよ。
2010/10/26(火) 10:49:20
Titanium DeskTopを試してみたけど、まんまHTAだな。
実に簡単に動いた。Exeも簡単に出来ちゃった。
MacもLinuxも持ってないけどこれで動くんでしょ？
Titanium MobileではiphoneとAndroidのアプリも作れちゃうらしいし。
っていうかこれでいいじゃんね？
PythonとRubyも組み込めるらしいから
深くやる場合はそっちで関数組んどいて逃げればいいらしい。
これからはラップ関数作っといてTitaniumへの移行も意識してHTA作ったほうがいいのかも。
2010/10/26(火) 17:35:44
閉じるのを抑止できなくても開くのはできるだろ
2010/10/26(火) 18:38:20
>>455
そう、閉じる前のメッセージを出すまでは出来るんですが
　「閉じますか？」→キャンセル→でも閉じる
という風にしか成らない。
やはり無理なんですかね。
現状で限界って所でしょうか。

>>457
でも、そういうブラクラ的な動作でもHTAなら出来るようになっていておかしく無いんじゃないかと。
閉じるボタン消すとかは普通に出来ますし
閉じられなくてもタスクマネージャーから殺せば落ちるでしょうっし。
2010/10/26(火) 18:48:24
ブラクラは、onBeforeUnload()の関数のところで、自分自身をまた開くとかやってるんじゃないの？
でも普通のhtaアプリでそういうことやっていいものかどうか。
2010/10/29(金) 20:57:22
HTAでフレームやiframeを使って、フレーム内にローカルのパスを指定すると
エクスプローラーのような動作になりますよね。
あの状態で、フレーム内のファイルの表示方法を変える方法はありますか？

対象フレームを focus() でアクティブにして　SendKeys　で　Alt+Shift+F10→V→L　とかやって見たんですが
フレーム内をアクティブにすることが出来ず、フレーム内のコンテキストメニューが出てこない。
2010/10/29(金) 22:55:50
IShellFolderViewDual2.CurrentViewMode=1～8
2010/11/20(土) 19:15:09
AxWebBrowser使えば
2010/11/28(日) 15:18:29
HTAって、どうやって動かせばいいんだっけ？
XPでは最初から動いたので気にもしていなかったが、
win2k+ie6sp1のマシンにもって行ったら起動しないし、
mshta.exeというので開いてもソースが表示されるだけ？
何か設定が必要なの？
2010/11/28(日) 15:51:19
>>466
ゴメン
先頭に入れていたコメントを<head>の中まで下げたら動いた。
2010/11/28(日) 16:58:39
>>467
htaで動かないものはhtmlでも動かない
2010/11/28(日) 17:36:51
>>468
xpでは動くんだよ。
何かルールがあるのかもしれないけど、環境によって緩いのかな？
2010/11/28(日) 17:56:40
ブラウザエンジンのエラー補完能力の差では？
OSって関係あるのかなぁ
2010/11/28(日) 18:21:57
>>470
xp側はieも8だから、そのせいかな。
<html>の前にコメント入れること自体間違いなのかしら。
2k+ie6でも、短ければ入れられるみたいだけど…
2010/11/28(日) 20:07:59
>>471
文書の文字コードがShift_JIS以外の場合、
キャラセットが明示的に宣言されるより前に2byte文字が存在すると、
不具合が起こる可能性がありますよ。
2010/11/29(月) 01:51:47
htaのスクリプトの中から自らが使っているmshta.exeのフルパスを得るにはどうしたらいいのかな？
WSHならWScript.Fullnameで取得出来る。
スクリプトのパスはlocation.pathnameで取得できるんだけども・・・
例えば、HTAを任意のUSBドライブに移したMSHTA.exeから起動した場合を想定してます。
2010/11/29(月) 15:56:13
wmi
tasklist
powershell
...
2010/11/30(火) 00:02:37
WMIでうまくいった。サンクス。
2010/11/30(火) 23:50:43
HTAはHTMより文字化けしやすくね？
2010/12/01(水) 00:08:37
>>476
俺は文字化けしたことはないな。
どういうときに化ける？
2010/12/01(水) 11:43:59
PSのConvetTo-HTMLの出力を取り込んだとき
479デフォルトの名無しさん
垢版 |
2010/12/01(水) 12:41:46
var hDB = new ActiveXObject( "ADODB.Connection" );
var Rs = new ActiveXObject( "ADODB.Recordset" );

hDBは参照渡しできるようですが
Rsが参照渡しできません。

なにか方法はありますか？
2010/12/01(水) 17:18:54
参照渡しできなかったときのコードをkwsk
481デフォルトの名無しさん
垢版 |
2010/12/01(水) 20:00:30
// Javascript
executeSql = function ( hDB, Sql, hST ) {
hST = hDB.Execute( Sql );
}

var hDB = new ActiveXObject( "ADODB.Connection" );
var Rs = new ActiveXObject( "ADODB.Recordset" );

executeSql( hDB, "SELECT * FROM tbl", Rs );

Rsに入ってこない
2010/12/01(水) 20:06:11
接続も補足で（接続はできています）
// Javascript
connect = function ( Obj ) {
Obj.Open( "～" );
}
executeSql = function ( hDB, Sql, hST ) {
hST = hDB.Execute( Sql );
}

var hDB = new ActiveXObject( "ADODB.Connection" );
connect( hDB );

var Rs = new ActiveXObject( "ADODB.Recordset" );

executeSql( hDB, "SELECT * FROM tbl", Rs );
2010/12/01(水) 21:02:20
ああ、そりゃ無理だ。JavaScript的に。
このぐらいで我慢しとけ。意味無さげだけど。

executeSql = function ( hDB, Sql,) {
return hDB.Execute( Sql );
}
2010/12/01(水) 22:21:56
>>483
そうですか

しょうがないからレコードセット使わないで関数内で配列とかに入れ替えるかな
2010/12/08(水) 14:23:40
>>454
onunload="while(1){alert('やだ、終了しないぞ');}"
2010/12/11(土) 12:03:30
htaからボタン操作を経て、wshやbatのスクリプトを起動するときにパスワードを渡して起動しようと思うんだけど、
もっとも安全なのはどっちだろう？
パスワード自身もなんらかの方法で暗号化しといて渡そうとは思うのだけれども。
PCは、特定のPCにこだわらず、USBを使ったポータブル環境でも使える前提で考えてる。

１、引数
２、プロセス環境変数
３、特定のパスのファイルを決め打ちしといて、そこに暗号化されたパスワードを書き込んでおいて、スクリプトで読む。
４、いろんなDLLを使ったプロセス間通信を経由して渡す。パスワードを管理してるアプリを作っといて、
それをWindowsの起動時から動かしといて、そこにスクリプトが決め打ちしてアクセスするような感じの運用。
（manifestを使えばUSB上のWScript.exeやmshta.exeからも外部Dllが使えることは理解してる。）
５、その他
2010/12/11(土) 15:49:39
１，２，３は丸見え
つパイプ
2010/12/11(土) 20:46:21
sfcminiで名前付きパイプで通信しる
2010/12/14(火) 23:43:35
>>476
defaultCharsetが違うせいだな
2010/12/18(土) 21:15:08
defaultCharsetはどこで設定するんすか？
2011/01/22(土) 14:00:37
とっくに明けてまっせ～
2011/01/28(金) 02:53:21
遅れ馳せながらおめでと～
2011/01/28(金) 15:27:56
レガシーなDLL(comでも.netでもない)をHTAから呼ぶときは、やっぱりSFCminiを使うのが一般的でしょうか?
それと、DLL内関数の戻り値を得ることは可能でしょうか?
2011/01/30(日) 16:02:01
// 具烈婦したらこんなのが出てきた。全然覚えてないが、いつの日かググッてい田んだろうｗ　ウィンドウタイトルの列挙だな
// sfcminiからEnumWindows.js
var EnumWindows=new ActiveXObject("SfcMini.DynaCall");
var IsWindowVisible=new ActiveXObject("SfcMini.DynaCall");
var GetWindowText=new ActiveXObject("SfcMini.DynaCall");
EnumWindows.Declare("user32","EnumWindows");
IsWindowVisible.Declare("user32","IsWindowVisible");
GetWindowText.Declare("user32","GetWindowTextA");

var wName=new ActiveXObject("SfcMini.Structure");
wName("str","String*256");

var T="";

EnumWindowsProc={
"CallBack":function(hWnd,lParam) {
if (IsWindowVisible(hWnd)) {
if (GetWindowText(hWnd,wName,256)) {
var wName2=wName.str;
wName2=wName2.substring(0,wName2.indexOf("\0",0));
T=T+wName2+"\r\n";
}
}
return(1);
}
}
EnumWindows(EnumWindows.CallBack(EnumWindowsProc,2),0);
WScript.Echo(T);
2011/04/05(火) 00:37:18.06
<!-- スクロール.hta
GoogleニュースかExcelをひらいて
こいつを立ち上げて
pを押すとスクロールすると
期待されます
-->
<script language="VBScript">
ResizeTo 90, 90
Set sh = CreateObject("Wscript.Shell")
Function MySendkeys()

If Lcase(document.getElementById("bodyWriter1").innerText) = "n" Then
document.getElementById("bodyWriter1").innerText=""
sh.SendKeys("%{TAB}{PGDN}%{TAB}")
ElseIf Lcase(document.getElementById("bodyWriter1").innerText) = "q" Then
close()
Else
document.getElementById("bodyWriter1").innerText=""
End If

End Function
</script>
<body id=bodyWriter1 CONTENTEDITABLE
onkeyup = "MySendkeys()"
>
</body>
2011/04/14(木) 20:04:03.62
border-radius使えねえ・・・
アップデートする気ねえのかなあMSは
2011/04/22(金) 20:06:31.24
ねぇーよ
2011/04/22(金) 22:59:11.41
手軽にUIが作れてローカルファイルがいじくれるからすごく重宝してるのに
C言語を覚えろって事ですか
■ このスレッドは過去ログ倉庫に格納されています
5ちゃんねるの広告が気に入らない場合は、こちらをクリックしてください。
ニューススポーツなんでも実況