Posted at

タブーの小技 パスワードクリップ BAT/VBA/Javascript


趣旨

職場などで使うと便利だけども

見つかると怒られる技術

そんなこつ言ったって面倒くさいものは面倒くさい

そのパスワードに意味ある?ほんとに?

ということはたびたびありますよね

クリップボードにパスワード入れてしまえばこっちのもんじゃーい!!

というあれこれです。

遊ぶ時間欲しさでやったなどと欲望直結の供述を繰り返しており

当局では精神鑑定も含め動機の解明にあたる方針です


Batファイル

一行で実装可能


秘密の鍵.bat

SET /P DUMMY="paswwwwwwwww"<NUL|clip



IE Javascript

IE専用ですが十分じゃろ


秘密の鍵.html

<html>

<head>
<title></title>
<script language="javascript" type="text/javascript">
function SetClip() {
window.clipboardData.setData("Text" , "paswwwwwwwww");
}
</script>
</head>
<body>
<input type="button" value="クリップボード" onclick="SetClip();"/>
</html>


Excel VBA

Microsoft Forms 2.0 Object Libraryを参照設定します。

※参照設定に存在しない場合は

c:\Windows\System32\FM20.DLLを参照してあげる。


Module1.bas

Sub SetClip()

Dim clipB As Object
Set clipB = New DataObject

With clipB
.SetText "paswwwwwwwww"
.PutInClipboard
End With

End Sub



秀丸エディタ

たまたま秀丸の入ってる環境だったので追記

カっとしてやった、反省はしていない。


秘密の鍵.mac

setclipboard "paswwwwwwwww";



先達 参考 Special Thanks

検索でひっかかるとは何事だ、大変ありがとうございます

Excel VBA から、クリップボードにテキストをセットする

https://qiita.com/rohinomiya/items/1b719bc90d7497688699

Office TANAKA クリップボードを操作する

http://officetanaka.net/excel/vba/tips/tips20.htm

VBEの参照設定で『Microsoft Forms 2.0 Object Library』が見つからない

http://www.tomodachihiroba.org/2016/01/vbe-microsoft-forms-2-0-object-library/