AutoHotkeyを使ってこちらのコードを作りたい場合どうすればいいでしょうか？

Question

AutoHotkeyを使って

文字付の時短のためにコード制作したのですがこちらの【検索ワード】部分も" . clipboard . "として自動で貼り付けつけしたいと考えています。どのようにすればいいでしょうか？よろしくお願いいたします。

Accepted Answer

ECマスターズの山本です。

> ただこちらのコードがエラーでうまくいきません
以下のようにしてください。
-------------
backup := ClipboardAll

ClipWait, 2
;()を使うと改行した複数行の文字列を生成できる
Clipboard = 
(
https://image.rakuten.co.jp/omise/cabinet/%clipboard%01.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%02.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%03.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%04.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%05.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%06.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%07.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%08.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%09.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%10.jpg
https://image.rakuten.co.jp/omise/cabinet/%clipboard%11.jpg

)

ClipWait, 2
Send, ^v
;ペースト実行待ちのwait
sleep 100
;バックアップを復元
clipboard = %backup%
;メモリ解放
backup =
return
-------------

> また、現在コピペソフトのcliborで改行ごとにFIFOモードでコピペしているのですが、AutoHotkey上でクリップボードのコピペに順番を入れられるのであればアドバイスお願いします。

基本的にクリップボード自体は
テキストの塊のようなものなので、
順番の概念はありません。

そのため、順番概念を付与した
実装をする必要があります。

例えばAutoHotKeyを使って
cliborのFIFOモードでの動作と
同等の動作をするキーを処理を作って
コピーとペーストのキーとして
割り当てることは可能です。

その場合は
Array := Object()
のような配列を使い
＜コピー＞
・コピー操作を1回したらクリップボードからArray(1)に格納
・コピー操作を2回したらクリップボードからArray(2)に格納
      :

＜ペースト＞
・ペースト操作を1回したらArray(1)からクリップボードに書きこんでペースト
・ペースト操作を1回したらArray(2)からクリップボードに書きこんでペースト
      :
のような動作をさせます。

※実際にはArray(1)を取り出したら、
Array(1)にの中身は
Array(2)に置き換えてArray(2)を
消して配列の全体数を減らす必要があります。

よろしくお願いいたします。

Answer

ECマスターズの山本です。

頂いたファイルをベース改造してみました。
以下のような動作仕様にしていますが、
ご期待通りでしょうか。

(1)検索したい文字を選択する
(2)ESC+9を押して実行する
(3)Chromeが起動する
(4)選択された文字でモール検索する
(5)検索結果ページのaタグのリンクを
　クリップボードにコピーする

※(3)のChromeのパスは
　弊社の環境でのパスのため、
　必要に応じて変更してください。

----------------
SetDefaultMouseSpeed, 0 ;マウス移動を瞬間移動にするコマンド
SetKeyDelay, 0 ;コマンド間隔を0にするコマンド　この二つはAHKファイルの先頭に置いておく

;おまじない。とりあえず書いておくと便利コード
#SingleInstance, Force
SendMode Input
SetWorkingDir, %A_ScriptDir%

ESC & Numpad9::
;【検索ワード】コピー
Send, ^c
ClipWait

Clipboard = %Clipboard%
url = https://search.rakuten.co.jp/search/mall/%Clipboard%/

;【検索ワード】で検索
ClipWait
Run, C:\Program Files (x86)\Google\Chrome\Application\chrome.exe ""%url%""

;検索先URLコピーでこちらの文章を作成
Clipboard = %Clipboard%
ClipWait

Return
---------------------

よろしくお願いいたします。

Answer

お世話になっております。

いただいたもの使ってイメージどおりの制作できました。
ひとつ疑問に思っていたことがあり

今回のahkで【検索ワード】と入れてテキスト制作すると
https://search.rakuten.co.jp/search/mall/【検索ワード】/
と出てきて、URLにもこのように表示されています。

楽天検索窓のURLをコピーすると
https://search.rakuten.co.jp/search/mall/%E3%80%90%E6%A4%9C%E7%B4%A2%E3%83%AF%E3%83%BC%E3%83%89%E3%80%91/
と出てきます。どこで聞いたか忘れたのですが楽天クーポンなどのURLを入れるときに検索入れてからそれをコピーしないと正確に作動しないというようなことを聞いたことがあり、URLのコピーをしてhttps://search.rakuten.co.jp/search/mall/%E3%80%90%E6%A4%9C%E7%B4%A2%E3%83%AF%E3%83%BC%E3%83%89%E3%80%91/のほうを使っていました。

説明文に検索のURLを使用する場合https://search.rakuten.co.jp/search/mall/【検索ワード】/のほうで問題ないのでしょうか？

よろしくお願いいたします。

Answer

ECマスターズの山本です。日本語が%表記になるのは URLエンコードという仕組みです。こちらは楽天が、というよりはリンクを埋め込むサイトの文字コードに依存します。サイトの構造のお話になりますので、今回は割愛しますが、文字化けによってうまくリンクが開けないことが起こることを想定すると%つきのリンクの方がよいと考えます。今まで%付きでリンクを生成していたということで aタグのリンクをURLエンコードしたURLで生成する AutoHotKeyのサンプルプログラムを以下に添付しますので、お試しください。 -------------------- SetDefaultMouseSpeed, 0 ;マウス移動を瞬間移動にするコマンド SetKeyDelay, 0 ;コマンド間隔を0にするコマンド　この二つはAHKファイルの先頭に置いておく ;おまじない。とりあえず書いておくと便利コード #SingleInstance, Force SendMode Input SetWorkingDir, %A_ScriptDir% ESC & Numpad9:: ;初期化 Clipboard = url = encoded = clipdata = ;【検索ワード】コピー Send, ^c ClipWait clipdata = %Clipboard% ;検索先URLコピーでこちらの文章を作成 jsEncodeURIComponent(str) { encoded := "" for i, char in StrSplit(str, "") { code := asc(char) if (char = " ") encoded .= "+" else if (code < 128) encoded .= Format("{:c}", code) else encoded .= EncodeUTF8(code) } return encoded } EncodeUTF8(code) { bytes := [] if (code < 0x0800) { bytes.Push(code >> 6 & 0x1F | 0xC0) bytes.Push(code & 0x3F | 0x80) } else if (code < 0x10000) { bytes.Push(code >> 12 & 0x0F | 0xE0) bytes.Push(code >> 6 & 0x3F | 0x80) bytes.Push(code & 0x3F | 0x80) } else if (code < 0x200000) { bytes.Push(code >> 18 & 0x07 | 0xF0) bytes.Push(code >> 12 & 0x3F | 0x80) bytes.Push(code >> 6 & 0x3F | 0x80) bytes.Push(code & 0x3F | 0x80) } encoded := "" for i, byte in bytes encoded .= Format("%{:X}", byte) return encoded } encoded := jsEncodeURIComponent(clipdata) url = https://search.rakuten.co.jp/search/mall/%encoded%/ ;【検索ワード】で検索 Run, C:\Program Files (x86)\Google\Chrome\Application\chrome.exe ""%url%"" Clipboard = Clipboard = %clipdata% ClipWait Return ---------------------

Answer

山本さんありがとうございます。
楽天のURLではできたのですが、店舗ページに置き換えて動作させたら【検索ワード】
そのままの状態になっていました。

アドバイスいただきたら嬉しいです。
よろしくお願いいたします。

Answer

ECマスターズの山本です。

url = https://search.rakuten.co.jp/search/mall/%clipboard%/?sid=XXXXX

ここの
%clipboard%
を
%encoded%
としてください。

%encoded%が変換した文字列が
入っています。
（%clipboard%だとコピーした
　元の文字列が入っています）

よろしくお願いいたします。

Answer

山本さんありがとうございます。

無事イメージ通り設定することができました。

もうひとつ
----------------------------------------------
;; 無変換+3で自店舗検索
sc07B & Numpad3:: 
Send, ^c
ClipWait
Run, C:\Program Files\Google\Chrome\Application\chrome.exe ""https://ranking.rakuten.co.jp/search?stx=%Clipboard%&prl=&pru=&rvf=&arf=&vmd=0&ptn=2&srt=1&sgid=""
Sleep, 100
Return
----------------------------------------------

こちら週間のランキングで検索できるようにしたのですが
スペースキーの入る言葉を入れると次の文字が表示されないのですが
この場合どのようにすれ2つのワードを入れることができるでしょうか？

アドバイスよろしくお願いいたします。

Answer

こちら説明間違ってました。

;; 無変換+3で自店舗検索
▼▼▼▼▼▼▼
;; 無変換+3で楽天週間ランキング検索

Answer

ECマスターズの山本です。


Run, C:\Program Files\Google\Chrome\Application\chrome.exe ""https://ranking.rakuten.co.jp/search?stx=%Clipboard%&prl=&pru=&rvf=&arf=&vmd=0&ptn=2&srt=1&sgid=""

この部分ですが、
%Clipboard%
がコピーした文字列になりますが、
この中に半角スペースがあるとURLの
パラメータとしてNGになります。

先ほど作成しました%encoded%の仕組みを
利用してURLエンコードするか、

StringReplace, Clipboard, Clipboard, %A_Space%, +, All

でクリップボード内の半角スペースを
+で置換してください。

よろしくお願いいたします。

Answer

お世話になっております。

こちらStringReplace, Clipboard, Clipboard, %A_Space%, +, All
を使ったことにより解決いたしました。

このコードとても使えると思ったのですが

画像のように楽天のクーポンの期日コピペすると

開始日時  
2023
 年 
04
 月 
26
 日 
13
 時 
00
 分 00秒 
終了日時  
2023
 年 
04
 月 
29
 日 
23
 時 
59
 分 59秒

こうなってしまうため時間がかかっています。
これを

AutoHotkeyでコピペしてキー入力で
2023年04月26日13時00分～04月29日23時59分迄
形にしたいです。

自分でこのように作ってみたのですがうまくいきませんでした。
;; テスト
F15 & o::
Send, ^c
ClipWait
StringReplace, Clipboard, Clipboard, %A_Space%, , All
StringReplace, Clipboard, Clipboard, %
%, , All
Send, ^v
Return


やりたいことはクリップボードとキー入力で、半角、改行、余分な部分 【00秒 59秒 開始日時 終了日時】 の削除をしたいです。
よろしくお願いいたします。###HR######IMG09e07fbe2240d5bb54527d3539b3b17a4.jpegIMG0###

Answer

こちら削除ではなく置換でした。
終了日時→～
59秒→迄

Answer

ECマスターズの山本です。

今回のような場合では、
・文字列が可変になる
・制御コードで変更をかける
ため、StringReplaceよりも
RegExReplaceで正規表現で
変換をした方が楽になります。

以下サンプルになります。

------------------
Clipboard =
clipdata =
NewStr =
Send, ^c
ClipWait
clipdata = %Clipboard%

;正規表現で改行とスペースを削除
NewStr := RegExReplace( clipdata, "[
|
||\s]", "" )

;正規表現で末尾のXX秒を迄に変更
NewStr := RegExReplace( NewStr, "[0-9][0-9]秒$", "迄" )
;正規表現で残ったXX秒を削除
NewStr := RegExReplace( NewStr, "[0-9][0-9]秒", "" )
;終了日時を～に変更
StringReplace, NewStr, NewStr, 終了日時, ～, All
;開始日時を削除
StringReplace, NewStr, NewStr, 開始日時, , All

;メッセージボックスで表示
MsgBox, %NewStr%
------------------

Answer

山本さんありがとうございます。
ahkイメージ通り使え、サンプルわかりやすく応用もできました。

商品ナンバーの数字をコピーしてF15 & F12を押すと、
画像を11個01.02を末尾につけてコピーしたいと思っています。
添付画像の楽天の画像を入れるときに使う予定です。
ただこちらのコードがエラーでうまくいきません。アドバイスいただけたら幸いです。
よろしくお願いいたします。また、現在コピペソフトのcliborで改行ごとにFIFOモードでコピペしているのですが、AutoHotkey上でクリップボードのコピペに順番を入れられるのであればアドバイスお願いします。

;;  商品ナンバーとキーでキャビネットの中にある商品ナンバー＋01、商品ナンバー＋02の画像のURLを１１個出すコード

F15 & F12::
backup := ClipboardAll
ClipWait, 2
Clipboard := "https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "01.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "02.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "03.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "04.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "05.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "06.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "07.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "08.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "09.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "10.jpg`n
https://image.rakuten.co.jp/omise/cabinet/" . clipboard .  "11.jpg`n"

ClipWait, 2
Send, ^v
return###HR######IMG06440efaed1158b405bc8c83d862ccfe6.jpegIMG0###

Answer

山本さんありがとうございます。

イメージ通りできました。
cliborのような設定は時間かかりそうなので後日で今はcliborのFIFOモード使いたいと思います。

ありがとうございました。

Answer

お世話になっております。
以前質問こちらの質問で教えていただいた

StringReplace, Clipboard, Clipboard, %A_Space%, +, All
ClipWait

こちらを使って

あああ いいい
▼▼▼▼▼▼▼
あああ＋いいい

という状態で検索して２つの単語を検索窓にいれることできたのですが、ランキングと検索順位君を併用したくAutoHotkeyに入れてみたのですが検索順位くんには＋の文字がそのまま反映されるためスペースにしたまま入力して、他の楽天URLにはスペースを＋に変換して入力したいと考えてAutoHotkeyのコードを作ったのですがうまくいきません。※テストのAutoHotkeyのファイルも添付しておきました。


アドバイスよろしくお願い致します。

Answer

ECマスターズの山本です。

確認しましたところ、
検索順位くんでURLでキーワードを入れる場合も
以下のように+で繋げる仕様となります。

keyword=あああ+いいい

そのため、スペースのままにする必要はなく
ランキングと同様に+に変換してから
他の楽天ページと同じように
Chromeの起動URLに設定するだけで動作します。

以下処理サンプルです。
（ショップ名などはXXXで消しています）
（Chromeの起動パスは異なります）
---------------------
Send, ^c
ClipWait

StringReplace, Clipboard, Clipboard, %A_Space%, +, All

Run, C:\Program Files (x86)\Google\Chrome\Application\chrome.exe ""https://tool2.ec-masters.net/service10.php?url=XXXX&keyword=%Clipboard%&sf=&ngkeyword=&genre=0&sr=1&ua=pc&av=1&region=13&smode=full""
Sleep, 100

Run, C:\Program Files (x86)\Google\Chrome\Application\chrome.exe ""https://ranking.rakuten.co.jp/search?stx=%Clipboard%&prl=&pru=&rvf=&arf=&vmd=0&ptn=2&srt=1&sgid=""
Sleep, 100

Run, C:\Program Files (x86)\Google\Chrome\Application\chrome.exe ""https://search.rakuten.co.jp/search/mall/%Clipboard%/""

Sleep, 100

Run, C:\Program Files (x86)\Google\Chrome\Application\chrome.exe ""https://search.rakuten.co.jp/search/mall/%Clipboard%/?sid=XXXXXXX""
---------------------
よろしくお願いいたします。

Answer

山本さんありがとうございます。

無事できました。ありがとうございました。

Answer

いつもお世話になっております。

AutoHotkeyで下記のようなコードを作ったとき
Run, C:\Program Files\Google\Chrome\Application\chrome.exe ""https://mainmenu.rms.rakuten.co.jp/""のプログラムと
Run, C:\Users\kujir\Music\music\10minute.mp3が同時に出てきてしまいます。

自分の中ではSleep 3000を入れているのでその後に出てきてほしいのですが
Run, C:\Users\kujir\Music\music\10minute.mp3のアクションが最後（前のアクションの次に）に反映されるにはどのようにしたら良いでしょうか？

アドバイスよろしくお願いいたします

----------------------------------------------
テスト.ahk


F13 & F1::


Run, C:\Users\kujir\AppData\Local\R-TASK3\filecopy.bat

Run, C:\Program Files\Google\Chrome\Application\chrome.exe ""https://mainmenu.rms.rakuten.co.jp/""

Sleep 2000

Send, {TAB}
Send, {TAB}
Send, {TAB}
Send, {ENTER}
Sleep 3000


Send, !l

Sleep 3000

Send, {TAB}
Send, {TAB}
Send, {ENTER}

Run, C:\Users\kujir\Music\music\10minute.mp3


Return
----------------------------------------------

Answer

ECマスターズの山本です。

添付いただいたスクリプトを
事務局での環境で実行してみましたが、
想定通りの
「Sleepで3秒まってから次のアクションが実行される」
という動作をしました。

作成したスクリプトの保存が正しくできているか、
保存したスクリプトをAutoHotKeyに
正しく読み込ませているか、を
ご確認ください。

構文としては
「Sleep 3000」
ではなく
「Sleep, 3000」
のため、カンマを入れてみてください。

よろしくお願いいたします。