-

●指定日時にポップアップ画面で、メッセージを表示させる。

※下記のスクリプトファイルを、拡張子をVBSとして保存し、
 タスクスケジューラで、このVBSファイルを指定日時に自動実行させる。

Option Explicit
Dim objWS
Set objWS = CreateObject("Wscript.shell")
objWS.Popup "メッセージ1行目" & vbCr & "メッセージ2行目"
Set objWS = Nothing



●付箋

※拡張子は、htaとして保存する。

<HTML XMLNS:HTA><HEAD><TITLE>Fusen(JavaScript)</TITLE>
<META content="text/html; charset=shift_jis" http-equiv=Content-Type><hta:application SINGLEINSTANCE="no" border="none" innerborder="yes" showintaskbar="yes" scroll="no"></hta:application></HEAD>
<BODY style="CURSOR: default" onmouseup=mouseup() oncontextmenu=contextmenu() onmousemove=mousemove() ondblclick=dblclick() contentEditable=true onmousedown=mousedown() leftMargin=1 topMargin=1 bgColor=white marginwidth="1" marginheight="1"><BASEFONT size=1 face="MS ゴシック">
<DIV>&nbsp; 
<DIV><STRONG>[■操作方法]-------------------------┐&nbsp;</STRONG></DIV>
<DIV>| 保存     : Alt + ダブルクリック |</DIV>
<DIV>| 終了     : Ctrl + ダブルクリック |</DIV>
<DIV>| 移動     : Ctrl + 右ドラッグ   |</DIV>
<DIV>| サイズ変更  : Alt + 右ドラッグ   |</DIV>
<DIV>└------------------------------------------┘</DIV>
<DIV>--------------------------------------------------------------------------76</DIV>
<DIV>
<DIV>
<DIV style="LINE-HEIGHT: 1.5em; FONT-VARIANT: normal; FONT-STYLE: normal; FONT-SIZE: 10px; FONT-WEIGHT: normal">&nbsp;</DIV>
<DIV style="LINE-HEIGHT: 1.5em; FONT-VARIANT: normal; FONT-STYLE: normal; FONT-SIZE: 10px; FONT-WEIGHT: normal">&nbsp;</DIV></DIV></DIV></BASEFONT>
<SCRIPT>
//------------------------------------------
//[■操作方法]
//移動:   右ドラッグ
//リサイズ: ALT  + 右ドラッグ
//保存:   ALT  + ダブルクリック
//終了:   CTRL + ダブルクリック
//20081203 system2222
//参考:Note it.HTA 
//------------------------------------------

moveTo(857,0);
resizeTo(408,1036);
var myPrePosiX;
var myPrePosiY;
var myMoveFlag=false;
var mySizeFlag=false;
var myMenuFlag=false;

//マウスボタンが押し込まれた際の処理
function mousedown(){
if(event.button==2){//マウス右ボタン押下時
if(event.altKey){//かつALTキー押下時 (=リサイズ処理)
mySizeFlag=true;
myPrePosiX=event.screenX;//現在の画面位置情報を、変数myPrePosiXに、格納。
myPrePosiY=event.screenY;//現在の画面位置情報を、変数myPrePosiYに、格納。
document.body.style.cursor="nw-resize";//マウスカーソル形状を、リサイズカーソルに変更。
}
else{//(=移動処理)
myMoveFlag=true;
myPrePosiX=event.screenX;//現在の画面位置情報を、変数myPrePosiXに、格納。
myPrePosiY=event.screenY;//現在の画面位置情報を、変数myPrePosiYに、格納。
document.body.style.cursor="move";//マウスカーソル形状を、移動カーソルに変更。
}
  }
}

//マウスカーソルが移動された際の処理
function mousemove(){
  if(myMoveFlag == true){
    moveBy(event.screenX-myPrePosiX,event.screenY-myPrePosiY);
    myPrePosiX=event.screenX;
    myPrePosiY=event.screenY;
    myMenuFlag=true;
 }
  if(mySizeFlag == true){
    resizeBy(event.screenX-myPrePosiX,event.screenY-myPrePosiY);
    myPrePosiX=event.screenX;
    myPrePosiY=event.screenY;
    myMenuFlag=true;
  }
}

//マウスボタンが押し上げられた際の処理
function mouseup(){
  if(myMoveFlag == true || mySizeFlag == true){
    myMoveFlag=false;
    mySizeFlag=false;
    document.body.style.cursor="default";
//マウスカーソル形状を、標準の形状に戻す。

  }
}

function contextmenu(){
  if(myMenuFlag == true){
    myMenuFlag=false;
    event.returnValue=false;
  }else{
    event.returnValue=true;
  }
}

function dblclick(){
  if(event.altKey){
    var myPath1=location.pathname.replace(/%20/g,' ')
    var myPath2=prompt("保存先ファイル名を入れてください。& vbCrLf &通常は、そのまま上書き保存してください。",myPath1);
    if(!myPath2)return;
    var fso=new ActiveXObject("Scripting.FileSystemObject");
    if(fso.FileExists(myPath2) && !confirm(myPath2+'\n既存のファイルに上書きしますか?'))return;
    var HTML=document.documentElement.outerHTML;
    HTML=HTML.replace(/moveTo\(\-?\d+,\-?\d+\);/,'moveTo('+(event.screenX-event.x)+','+(event.screenY-event.y)+');');
    HTML=HTML.replace(/resizeTo\(\d+,\d+\);/,'resizeTo('+(document.body.offsetWidth)+','+(document.body.offsetHeight)+');');
    fso.CreateTextFile(myPath2).Write(HTML);
    if(myPath1!=myPath2){
      new ActiveXObject("WScript.Shell").Run('"'+myPath2+'"');
      close(); 
    }
  }else if(event.ctrlKey){
    if(confirm("終了しますか?"))close();
  }else{
    if(document.body.contentEditable=="true")document.body.contentEditable="false";
    else document.body.contentEditable="true";
  }
}

</SCRIPT>
</DIV></BODY></HTML>

コメントをかく


「http://」を含む投稿は禁止されています。

利用規約をご確認のうえご記入下さい

▼当HP内検索▼

▼メインメニュー▼



管理者用リンク
書籍(技術書)
・利用ソフト一覧
・Ethereal/Wireshark

転送速度




・powershell

・VBA










・Microsoft SQLserver








●CentOS6.9


▼動画サーバ関係

MP3について
DVDからのMP3変換について?
DVDからの動画変換について



▼自転車関係
・Panasonic CRAZY BOY

▼自動車関係
・SUZUKI エブリワゴンDA62W


▼Linux/Unix関係
・Linux基礎(パッケージ)
・Linux基礎(システム構成)
・Linux(Debian)基本コマンド
・Linuxコマンド(テキスト処理)
・Linuxコマンド(未整理)
・Linuxコマンド(ネットワーク系)
・FedoraCore OS メモ
・Debian Linux OS メモ
・Vine Linux OS メモ
・xPUD メモ

・CentOS6.4(minimal)


・solaris9 メモ
・solaris10 メモ

▼CCNA関係


▼ノートPC関連

液晶パネル

Fujitsu FMV-820MT
・Compaq Evo Notebook N110
・Panasonic Let's note CF-S51R
・Toshiba Dynabook Satellite 1800


▼デスクトップPC関連
・AOpen AX3S Pro-U
・ASUS CUSL2
・ASUS CUSL2-M


▼携帯電話
・NTT DoCoMo FOMA M1000
・FOMA P704iμ


▼モデム関連
▼ADSLモデム
・NTT ADSLモデム-NV
・NEC PA-WD605CV
・NEC PA-WD701CV
▼アナログモデム
・GVC F-1156IV/R9

▼ルータ関連
▼ルータ
・OMRON MR504DV
・FON La Fonera FON2100E
・Cisco Cisco2620
・Cisco4500M
・Cisco1601
  Cisco1603-R
  Cisco1605

・Cisco 共通メモ

・BUFFALO BLR3-TX4L
・I・O DATA NP-BBR
・NEC PA-WB7000/B (AtermWB7000H)
・マイクロ総研 NetGenesis OPT
・Persol PBR001

・YAMAHA NetVolante RTA54i
・FUJITSU NetVehicle-I

▼イーサネットコンバータ関連
・LINKSYS WET11

▼TA関連
・NEC AtermIT60D1L(S)

▼ハブ関連
・Cisco Catalyst 2924-XL-EN
・AlliedTelesis CentreCOM8216XL2
・BUFFALO LSW10/100-8
・corega FSW-5PM
・corega HUB-5PM
・CONTEC RT-1216S

▼NIC関連
・BUFFALO WLI-U2-SG54HP
・PLANEX GW-NS54GMX
・NTT-ME MN SS-LAN CARD 11 HQ

▼プリンタサーバ関連
・corega Pserver
・I・O DATA PLANT ET-FPS1E

▼デジカメ関連
・MINOLTA DiMAGE F100

▼携帯電話ケーブル関連
・BUFFALO IGM-UPDC
・OMRON ME64KTID
・OMRON ME96KTI
・SOURCENEXT SUS-USB-02 REV.1
・UP12 USB-PDC Converter
・DAISO D106

▼その他PC周辺機器
●キーボード
・Bluetoothキーボード BK3001BA
●ハンディターミナル
・ENSO BHT-6500
●ダウンスキャンコンバータ
・SC-TVEX
●CD-ROMドライブ
・NEC CD-2800D
・BUFFALO CDN-D24EX
・BUFFALO DVM-RDM16IU2
●MOドライブ
・ELECOM LMO-230-S
・FUJITSU MCF3064SS
・FUJITSU SMB-640WL2
●スピーカー
・Justy JSP-10W
●MP3プレーヤ
・SanDisk sansa e130
・NHJ V@mp VP-415
●インタフェースカード
・玄人志向 USB2.0+1394a-CB
・nbj IDE-3525
・Notebook Power Sharing
●ACアダプタ
・Universal AC Adaptor
●マウス
・Logitec Marble Mouse
・needs progres TN-30RFMOSG
●タブレット
・WACOM FAVO(ET-0405-U)
●その他
・IDEAL ME-320X(ME-320U2F)
・KY-05046S-12-H
・LifeView USB CapView
・ハードウェア(その他)
●シリアルレベルコンバータ
・シリアルレベルコンバータ


▼Windows系メモ
・DOS起動ディスク
・Microsoft OS メモ
・Microsoft 系ソフト メモ
・その他 ソフトウェアメモ
・Network Notepad
・Packet Tracerメモ
・パノラマ写真作成ソフト
・トラブル対処履歴


▼プログラミング関連
・言語比較
・VBS
・卒研事前メモ
・卒研メモ
・Windowsプログラミング
・JANコード・ISBNコード相互変換
●C言語
・文字列
・ファイル操作
●アルゴリズム
・再帰アルゴリズム
●JAVA
・Javaプログラミング
●その他
・初心者プログラミング
・ソフトウェア未整理メモ



▼家電関連
●テレビ
・SHARP AQUOS LC-20D10
・FUNAI TV-14CP
・BLUEDOT BTV-900K
・AKART AK-FTV913
・REAL LIFE JAPAN IQ-191LEDTV
AQUOS DZ3シリーズのDLNA機能
Viera V1シリーズのDLNA機能
●プロジェクタ
・crenova XPE470
●AVセレクタ
・DataSystem AVS430
●ビデオ
・FUNAI TV-14CP
●HDD&DVDレコーダ
・Toshiba RD-XS46
・NEC PK-AX10
●DVDプレーヤー
・GREEN HOUSER GH-PDV9AT
・情熱価格 DVDJ-DQ03
●メディアプレーヤー
・MINI HD MEDIA BOX 1080P
・1080P FULL HD Media Player
・1080P HD Media Player Mini 1080
・HD media player

●チューナー
・COMTEC DTW700
・HUMAX CI-S1

●アンテナ
・ADDZEST ZCP107
・マルハマ AGS-590

●ヘッドマウントディスプレイ
・VIRTUAL i/O i-glasses
●電動歯ブラシ
・ブラウン電動歯ブラシ
●電話機
・SHARP DA-C5-B
●コードレス電動ドリル、ドライバ
・BLACK&DECKER CSD300T
・RELIEF 30946?

▼カーナビ関係
Panasonic CN-GP510VD
Panasonic CN-G1100VD
▼カーステレオ関係
Kenwood U585SD

▼おもちゃ関連
●ラジコン
・ラジコンのプロポ改造


▼カー用品関連
●インダッシュTV
・ADDZEST TVS6250


▼DIY関連
・懸垂スタンド
・蓄光塗料


▼電子工作関係
・コネクタピンアサイン
・LANケーブルをAVケーブル化
・LANケーブルをRGBケーブル化
・地上デジタル放送アンテナ
・電子工作 メモ
・乾電池を充電


▼デザイン関連
●腕時計
・腕時計


▼その他

・HP製作関連メモ
・アイデアメモ

・コラム・メモ
・趣味・興味


・ToDo
・ネットインフラ?


▼資格・履歴書・マナー
・資格取得メモ
・工事担任者対策メモ
・履歴書・職務経歴書
・答辞


▼修学旅行 フランス(パリ)


▼掲示板
●掲示板
 意見・苦情・質問用に仮設置。

▼フリーエリア▼

▼おしらせ▼

管理人/副管理人のみ編集できます