【VBScript】WSHについて話し合うスレ【JScript】 (181ﾚｽ)
上下前次1-新
1: デフォルトの名無しさん [] 2020/01/09(木) 07:20:41.41 ID:wvbDpdNb(1/2) AAS
みんなで話し合おう
2: デフォルトの名無しさん [] 2020/01/09(木) 21:52:18.83 ID:wvbDpdNb(2/2) AAS
みんな・・・
3: デフォルトの名無しさん [] 2020/01/09(木) 23:04:30.93 ID:FBsxulAT(1) AAS
オワコン
4(1): デフォルトの名無しさん [sage] 2020/01/10(金) 01:20:03.96 ID:OzcTj1e5(1) AAS
MSがとうに捨てたものの何を語るの
思い出話ならマ板でやんな
5: デフォルトの名無しさん [sage] 2020/01/10(金) 01:23:36.48 ID:J+c7EK2n(1) AAS
出先でサクッとお世話になるやつだぞ
6: デフォルトの名無しさん [] 2020/01/10(金) 07:17:53.27 ID:ALcwyMXE(1) AAS
unibonさんの上質なブログが消えてる・・・
7: デフォルトの名無しさん [sage] 2020/01/10(金) 08:01:53.55 ID:CuaAbu+V(1) AAS
>>4
現実をみな、ゆとり君。
8(1): ウーロン ◆YAZTByPXwc6o [] 2020/01/14(火) 23:06:04.53 ID:p1ffDOn1(1) AAS
Eqv演算子の使い途を募集します
9(1): デフォルトの名無しさん [] 2020/01/14(火) 23:48:44.25 ID:4cwMiqXc(1) AAS
:: .|ﾐ|
:: .|ﾐ|
:: .|ﾐ| ::::::::
::::: ＿＿＿＿ |ﾐ| ::::
:: ,. -'"´ ｀¨ー ､ ::
:: ／ ,,.-'" ヽ ヽ、 ::
:: ,,.-'"_ r‐'" ,,.-'"｀ ヽ、 ::
:: / ヾ ( _,,.-='==-､ヽ ヽ、
:: i へ＿__ ヽゝ=-'"／ _,,> ヽ
:: ./ / ＞ ＝'''" ￣￣￣ ヽ
:: / .<_ ノ''" ヽ i
:: / i 人＿ ノ .l
:: ,' ' ,_,,ノｴｴｴｪｪ了 /
i じｴ='='='" ', / ::
', (___,,..----U ／ ::
ヽ、 __,,.. --------------i-'" ::
ヽ､_ __ -_'"--''"ニニニニニニニﾆヽ ::
｀¨i三彡--''"´ ヽ ::
/ ヽ :: ┼ヽ -|r‐､. ﾚ |
/ ヽ:: ｄ⌒) ./| _ﾉ __ﾉ
10(1): デフォルトの名無しさん [age] 2020/01/20(月) 08:39:19.96 ID://bqLjsW(1) AAS
>>9
いま電車の中なんですがウンコ漏らしましたアドバイスお願いします
11: デフォルトの名無しさん [] 2020/01/21(火) 01:13:39.64 ID:Ouj2sRCI(1) AAS
>>10
:: .|ﾐ|
:: .|ﾐ|
:: .|ﾐ| ::::::::
::::: ＿＿＿＿ |ﾐ| ::::
:: ,. -'"´ ｀¨ー ､ ::
:: ／ ,,.-'" ヽ ヽ、 ::
:: ,,.-'"_ r‐'" ,,.-'"｀ ヽ、 ::
:: / ヾ ( _,,.-='==-､ヽ ヽ、
:: i へ＿__ ヽゝ=-'"／ _,,> ヽ
:: ./ / ＞ ＝'''" ￣￣￣ ヽ
:: / .<_ ノ''" ヽ i
:: / i 人＿ ノ .l
:: ,' ' ,_,,ノｴｴｴｪｪ了 /
i じｴ='='='" ', / ::
', (___,,..----U ／ ::
ヽ、 __,,.. --------------i-'" ::
ヽ､_ __ -_'"--''"ニニニニニニニﾆヽ ::
｀¨i三彡--''"´ ヽ ::
/ ヽ :: ┼ヽ -|r‐､. ﾚ |
/ ヽ:: ｄ⌒) ./| _ﾉ __ﾉ
12(3): デフォルトの名無しさん [] 2020/01/30(木) 00:54:03.28 ID:UB+VSHu4(1/2) AAS
instrを使っていて中身は同じコードのVBSファイルなのに
一つは日本語検索が正しくヒットするが、もう一つはヒットしないという状況が発生してるんだけど、VBSでは起こり得る現象？
ちなみに日本語検索ができないファイルはアルファベットなら正しく検索できる
ファイル自体に問題が起きてるのかな
13: デフォルトの名無しさん [] 2020/01/30(木) 01:01:32.79 ID:KegIzDa6(1) AAS
>>12
:: .|ﾐ|
:: .|ﾐ|
:: .|ﾐ| ::::::::
::::: ＿＿＿＿ |ﾐ| ::::
:: ,. -'"´ ｀¨ー ､ ::
:: ／ ,,.-'" ヽ ヽ、 ::
:: ,,.-'"_ r‐'" ,,.-'"｀ ヽ、 ::
:: / ヾ ( _,,.-='==-､ヽ ヽ、
:: i へ＿__ ヽゝ=-'"／ _,,> ヽ
:: ./ / ＞ ＝'''" ￣￣￣ ヽ
:: / .<_ ノ''" ヽ i
:: / i 人＿ ノ .l
:: ,' ' ,_,,ノｴｴｴｪｪ了 /
i じｴ='='='" ', / ::
', (___,,..----U ／ ::
ヽ、 __,,.. --------------i-'" ::
ヽ､_ __ -_'"--''"ニニニニニニニﾆヽ ::
｀¨i三彡--''"´ ヽ ::
/ ヽ :: ┼ヽ -|r‐､. ﾚ |
/ ヽ:: ｄ⌒) ./| _ﾉ __ﾉ
14(1): デフォルトの名無しさん [sage] 2020/01/30(木) 01:09:03.71 ID:2WRQqBTO(1) AAS
PowerShellめんどくせーよ
15: デフォルトの名無しさん [sage] 2020/01/30(木) 01:13:40.22 ID:DIl9Ziw8(1) AAS
>>14
:: .|ﾐ|
:: .|ﾐ|
:: .|ﾐ| ::::::::
::::: ＿＿＿＿ |ﾐ| ::::
:: ,. -'"´ ｀¨ー ､ ::
:: ／ ,,.-'" ヽ ヽ、 ::
:: ,,.-'"_ r‐'" ,,.-'"｀ ヽ、 ::
:: / ヾ ( _,,.-='==-､ヽ ヽ、
:: i へ＿__ ヽゝ=-'"／ _,,> ヽ
:: ./ / ＞ ＝'''" ￣￣￣ ヽ
:: / .<_ ノ''" ヽ i
:: / i 人＿ ノ .l
:: ,' ' ,_,,ノｴｴｴｪｪ了 /
i じｴ='='='" ', / ::
', (___,,..----U ／ ::
ヽ、 __,,.. --------------i-'" ::
ヽ､_ __ -_'"--''"ニニニニニニニﾆヽ ::
｀¨i三彡--''"´ ヽ ::
/ ヽ :: ┼ヽ -|r‐､. ﾚ |
/ ヽ:: ｄ⌒) ./| _ﾉ __ﾉ
16: デフォルトの名無しさん [sage] 2020/01/30(木) 08:23:11.79 ID:VLt/7sPi(1) AAS
>>12
CP932/BOMありUTF-8 は、判別できるけど、
BOMなしUTF-8 では、どちらか判別できない
一般的に、Web 系開発では、BOMを付けるとバグるので、BOMなしUTF-8 を使うと、
Explorer では日本語検索ができなくなる
だから漏れは、Windows 10, WSL, Ubuntu 18.04 を入れて、
Linux 側から、grep を使って検索している！
VSCode で、文字コード・改行文字などを簡単に変更できる
17: デフォルトの名無しさん [age] 2020/01/30(木) 11:22:02.58 ID:K3IPeO5P(1) AAS
>>12
文字コードがおかしいのじゃないかな
VBSはShift_JISとUTF-16にしか対応してないから
UTF-8で保存してるとそういうこと起こる
18: デフォルトの名無しさん [] 2020/01/30(木) 22:35:44.82 ID:UB+VSHu4(2/2) AAS
文字コード変えたら動いた
ありがとう
過疎スレかと思いきや即日レスが来ていて嬉しいｗ
19: デフォルトの名無しさん [sage] 2020/01/30(木) 22:50:39.81 ID:ZimD6n5w(1) AAS
ピッコロの自演とRubyおじさんかよ
20(3): デフォルトの名無しさん [] 2020/02/02(日) 20:48:15.24 ID:M83iuexz(1/2) AAS
WSH（Windows Scripting Host）でInternet Explorerを動かすことができるけど
FireFoxやChromeを動かすことができるスクリプト言語ってないですかね？
もしFireFoxを動かすことができれば、Linuxでもフォーム入力の作業が捗るので
便利なんですよね
21(1): デフォルトの名無しさん [sage] 2020/02/02(日) 20:49:23.38 ID:M83iuexz(2/2) AAS
C;\ HDDドライブの一覧をリカーシブに取得するWSHは重宝してます
22: デフォルトの名無しさん [sage] 2020/02/02(日) 21:16:58.66 ID:WUJbACls(1) AAS
>>20
>>21
:: .|ﾐ|
:: .|ﾐ|
:: .|ﾐ| ::::::::
::::: ＿＿＿＿ |ﾐ| ::::
:: ,. -'"´ ｀¨ー ､ ::
:: ／ ,,.-'" ヽ ヽ、 ::
:: ,,.-'"_ r‐'" ,,.-'"｀ ヽ、 ::
:: / ヾ ( _,,.-='==-､ヽ ヽ、
:: i へ＿__ ヽゝ=-'"／ _,,> ヽ
:: ./ / ＞ ＝'''" ￣￣￣ ヽ
:: / .<_ ノ''" ヽ i
:: / i 人＿ ノ .l
:: ,' ' ,_,,ノｴｴｴｪｪ了 /
i じｴ='='='" ', / ::
', (___,,..----U ／ ::
ヽ、 __,,.. --------------i-'" ::
ヽ､_ __ -_'"--''"ニニニニニニニﾆヽ ::
｀¨i三彡--''"´ ヽ ::
/ ヽ :: ┼ヽ -|r‐､. ﾚ |
/ ヽ:: ｄ⌒) ./| _ﾉ __ﾉ
23: デフォルトの名無しさん [sage] 2020/02/02(日) 22:10:44.42 ID:E6XjJVd9(1) AAS
>>20
iMacrosとかSeleniumとかWebアプリの開発で使ってる人見たことあるよ
WSHでは難しい
24(4): デフォルトの名無しさん [sage] 2020/02/02(日) 23:59:09.56 ID:ceem9FS2(1) AAS
>>20
漏れは、Ruby で、Selenium WebDriver, Nokogiri などで、
Chrome, Edge などのブラウザーを自動操作して、スクレイピングする
25(1): デフォルトの名無しさん [] 2020/02/04(火) 13:10:26.42 ID:yAXtWmh5(1) AAS
>>24 Rubyでブラウザを動かすためのおすすめのスクリプトありますか？
26: デフォルトの名無しさん [sage] 2020/02/04(火) 23:08:37.00 ID:89Ab/VhP(1) AAS
>>25
ない
:: .|ﾐ|
:: .|ﾐ|
:: .|ﾐ| ::::::::
::::: ＿＿＿＿ |ﾐ| ::::
:: ,. -'"´ ｀¨ー ､ ::
:: ／ ,,.-'" ヽ ヽ、 ::
:: ,,.-'"_ r‐'" ,,.-'"｀ ヽ、 ::
:: / ヾ ( _,,.-='==-､ヽ ヽ、
:: i へ＿__ ヽゝ=-'"／ _,,> ヽ
:: ./ / ＞ ＝'''" ￣￣￣ ヽ
:: / .<_ ノ''" ヽ i
:: / i 人＿ ノ .l
:: ,' ' ,_,,ノｴｴｴｪｪ了 /
i じｴ='='='" ', / ::
', (___,,..----U ／ ::
ヽ、 __,,.. --------------i-'" ::
ヽ､_ __ -_'"--''"ニニニニニニニﾆヽ ::
｀¨i三彡--''"´ ヽ ::
/ ヽ :: ┼ヽ -|r‐､. ﾚ |
/ ヽ:: ｄ⌒) ./| _ﾉ __ﾉ
27: 24 [sage] 2020/02/05(水) 00:17:51.94 ID:NEouxGwD(1) AAS
Ruby で、Yahoo への自動ログイン
require "selenium-webdriver"
options = Selenium::WebDriver::Chrome::Options.new
options.add_option( :detach, true ) # シェルから、ブラウザを切り離す
options.add_argument( '--start-maximized' ) # 画面最大
driver = Selenium::WebDriver.for :chrome, options: options
driver.manage.timeouts.implicit_wait = 10 # default timeout
driver.navigate.to "https://login.yahoo.co.jp/config/login_verify2?.src=ym"
element = driver.find_element(:id => "username")
element.send_key "ユーザー名"
driver.find_element(:id => "btnNext").click
element = driver.find_element(:id => "passwd")
element.send_key "パスワード"
driver.find_element(:id => "btnSubmit").click
28(1): デフォルトの名無しさん [] 2020/02/09(日) 18:02:10.29 ID:2hRj0kA8(1) AAS
>>24 そのスクリプトを解説するブログを立ち上げたら、めっちゃアクセスでると思います
需要が高いから
29: デフォルトの名無しさん [sage] 2020/02/09(日) 18:22:31.17 ID:s/j5AiPK(1) AAS
>>28
:: .|ﾐ|
:: .|ﾐ|
:: .|ﾐ| ::::::::
::::: ＿＿＿＿ |ﾐ| ::::
:: ,. -'"´ ｀¨ー ､ ::
:: ／ ,,.-'" ヽ ヽ、 ::
:: ,,.-'"_ r‐'" ,,.-'"｀ ヽ、 ::
:: / ヾ ( _,,.-='==-､ヽ ヽ、
:: i へ＿__ ヽゝ=-'"／ _,,> ヽ
:: ./ / ＞ ＝'''" ￣￣￣ ヽ
:: / .<_ ノ''" ヽ i
:: / i 人＿ ノ .l
:: ,' ' ,_,,ノｴｴｴｪｪ了 /
i じｴ='='='" ', / ::
', (___,,..----U ／ ::
ヽ、 __,,.. --------------i-'" ::
ヽ､_ __ -_'"--''"ニニニニニニニﾆヽ ::
｀¨i三彡--''"´ ヽ ::
/ ヽ :: ┼ヽ -|r‐､. ﾚ |
/ ヽ:: ｄ⌒) ./| _ﾉ __ﾉ
30: 24 [sage] 2020/02/10(月) 09:13:27.44 ID:8D13KkA5(1) AAS
ハローワークのインターネットサービスをスクレイピングして、こういうのが出来れば
（事業所の意向により公開していません）
と、事業所名を非公開にしている、会社を非表示にできたら
同じ会社の複数の求人を、1つだけの表示にできれば
非表示にできる会社の数を、無限に登録できれば
31: デフォルトの名無しさん [] 2020/02/12(水) 10:35:11.36 ID:w04clBR4(1) AAS
それこそseleniumとか使えば簡単にできるんじゃない？
人間がアクセスしてる風の時間感覚にしないとアク禁されそうだけど
32: デフォルトの名無しさん [sage] 2020/02/13(木) 00:06:07.25 ID:EA40twA9(1) AAS
どっちにしろVBSやピッコロ ◆YAZTByPXwc6oの出る幕じゃないけどね
33(2): デフォルトの名無しさん [sage] 2020/03/01(日) 21:46:25.58 ID:aiS1BF+G(1/2) AAS
バッチ処理でフォルダの処理がしたくていろいろと調べながら、ここまで書いたのですが
VBSのコードのみでは動くのですが、バッチに潜り込ませるとエラーになります。
文字コードはShiftJISにしてあります。
エラーは 〇〇.bat(1, 1) Microsoft VBScript コンパイル エラー: 文字が正しくありません。
とでます。どこが悪いのかわかる方はいませんでしょうか。
p.s WSHはもう終わりということですが、今後同じことをやる場合はPowerShellでできる(やる)ということですか？
34: デフォルトの名無しさん [sage] 2020/03/01(日) 21:46:49.18 ID:aiS1BF+G(2/2) AAS
> 33 続き
〇〇.bat
@if(0)==(0) echo off
cscript.exe //nologo //E:VBScript "%~f0" %*
echo コピー元フォルダは %srcFolder%
echo コピー先フォルダは %dstFolder%
robocopy "%srcFolder%" "%dstFolder%" /mir /r:0 /w:0 /dcopy:t /sec /fft /xjd /xjf /xf *.lnk
goto :eof
@end
Option Explicit
SetFolderName()
Wscript.Quit()
sub SetFolderName()
dim wshEnv
set wshEnv = WScript.CreateObject("WScript.Shell").Environment("Volatile")
wshEnv.item("srcFolder") = GetFolderName("コピー元のフォルダを指定してください"&vbCRLF&"例 C:\Users\ユーザー名")
wshEnv.item("dstFolder") = GetFolderName("コピー先のフォルダを指定してください"&vbCRLF&"例 D:\")
end sub
function GetFolderName(strQ)
dim wshShell, wshPath
dim PathName
set wshShell = WScript.CreateObject("Shell.Application")
set wshPath = wshShell.BrowseForFolder(0, strQ, &h1)
if not wshPath Is Nothing Then PathName = wshPath.Items.Item.Path
GetFolderName = PathName
End function
35(1): デフォルトの名無しさん [sage] 2020/03/02(月) 00:08:31.21 ID:TxSplURq(1/2) AAS
>>33
それは JScript をバッチに埋め込むときに使うテクニック。
エンジンに VBScript を指定してたら、そりゃあ1行目の1文字目でエラーになる。
36: デフォルトの名無しさん [sage] 2020/03/02(月) 00:09:47.70 ID:TxSplURq(2/2) AAS
>>33
「VBScript を混在させる技」でググって出てくるページを参考にすると良いと思う。
（この板URLが貼れないっぽい？）
でも、このバッチはドラッグ＆ドロップで使った時に特定の文字（キャレットや半角空白等）を含むファイル名を正しく処理できるんかなぁ…？
試したら教えて。
37: デフォルトの名無しさん [] 2020/03/02(月) 17:20:16.95 ID:p3CUZnH+(1) AAS
>35 36
ありがとうございます。
これの仕組むをざっと調べた限り条件コンパイル？
みたいな感じで、jscriptが、@if〜@endまでを
実行しないみたいな仕組みで動いているようですので、
cscript呼び出しで、引数を渡すなどはできました。
ただjscriptから、戻ってきた時に値渡しする方法が、
わからず、環境変数を使う事を考えましたが、
同じプロセス内あつかいで、環境変数もまんまでは
無理でした。もうちょい色々試してみます。
ありがとうございました。
38: デフォルトの名無しさん [sage] 2020/03/02(月) 23:28:17.00 ID:8PHDRupm(1) AAS
例えば、vbs ファイルの中で、powershell コマンドも呼べる。
可読性の悪いバッチで、プログラミングしなくても、vbs 中で、robocopy を呼べば？
CreateObject("WScript.Shell").Run "powershell ""gcb | % trim | scb""", 0
例えば漏れは、バッチファイルには、
「ruby .\script.rb」みたいに、起動コマンドしか書かない
例えば下のように、そのRuby スクリプト内で、
powershell, clip コマンドを呼んで、クリップボード処理を行う
# クリップボード内の複数行文字列の、各行の先頭・末尾から、
# 連続する空白類を除去して、クリップボードに入れる
str = `powershell Get-Clipboard`
str.encode! Encoding::UTF_8, Encoding::CP932 # UTF_8 へ変換
ary = str.each_line.map( &:strip ) # 連続する空白類を除去する
IO.popen( 'clip', 'w:cp932' ) do | clip | # CP932 へ戻す
clip.print( ary.join "\n" )
end
39(1): デフォルトの名無しさん [] 2020/04/10(金) 13:47:03.67 ID:2KZut19P(1/2) AAS
Windows 10, WSL では、GUI が使えないが、
VBScript を使うと、GUIの入力ダイアログなどで、入力できるらしい！
入力ダイアログで入力 → 入力値をWindows側のファイルに保存
→ そのファイルを、Linux側で読み出して処理する
こういう簡単なサンプルを、書いてもらえませんか？
40: デフォルトの名無しさん [] 2020/04/10(金) 14:07:29.64 ID:bhRn7qUp(1) AAS
X入れろよ
41: デフォルトの名無しさん [] 2020/04/10(金) 14:11:53.04 ID:mpIpCatM(1) AAS
powershell使いなよダイアログでも独自フォームでも何でも出せるぞ
42(2): 39 [sage] 2020/04/10(金) 18:00:39.26 ID:2KZut19P(2/2) AAS
以下を、CP932(sjis)で、input.vbs に書いて、
WSL, Ubuntu 18.04 から、wscript.exe input.vbs と実行したら、
文字化けもせずにダイアログが表示された
wscript.exe のパスも通っている
which wscript.exe
/mnt/c/WINDOWS/system32/wscript.exe
でも、どうやって、CP932 から、UTF-8 へ変換するか？
Ruby でも使うか？
Dim Input
Input = InputBox("名前を入力してください。")
MsgBox(Input & "を入力しました。")
43: デフォルトの名無しさん [sage] 2020/04/10(金) 22:38:17.40 ID:fYJRGaFQ(1) AAS
この人物は荒らしの自覚がないようだ
113 名前：デフォルトの名無しさん[sage] 投稿日：2020/04/09(木) 15:48:38.65 ID:pqMoXxyo
荒らしは必ず、2回書き込む。
「そうだよね」とか、同意するレスを付けて、人数が多いように見せる
くだすれPython(超初心者用) その47【Ruby禁止】
Ruby禁止とか、色々なスレのタイトルを勝手に変える
工学部というコテハンだろ。
ソースコードを書かないし、プログラマーじゃないから相手をしないように！
上下前次1-新書関写板覧索設栞歴
あと 138 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.015s