Hatena::Groupraru

教えてなでしこ

2012-12-09

[]VBScriptJscriptWindows Script HostのHTMLヘルプをダウンロード 17:01 はてなブックマーク - VBScript、Jscript、Windows Script HostのHTMLヘルプをダウンロード - 教えてなでしこ

Download: Windows Script Version - Microsoft Download Center - Download Details

上記リンクからダウンロードしたscd56jp.exeを実行すると、Windows_Script_V5.6_ドキュメントがインストールされる。

2012-10-29

[]TTBaseのラーメンタイマーを自動で30分設定で起動させるUWSCスクリプト 21:11 はてなブックマーク - TTBaseのラーメンタイマーを自動で30分設定で起動させるUWSCスクリプト - 教えてなでしこ

UWSCの勉強のために書いてみた。

Dim PopupTitle  = "TTBase"
ClkItem(GetID("", "Shell_TrayWnd"), PopupTitle, CLK_DBLCLK)
KBD(VK_DOWN,DOWN,100)
KBD(VK_RETURN,DOWN,100)
Dim Ramen = GetID("ラーメンタイマー")
SENDSTR(Ramen,"30",1,TRUE)
CLKITEM(Ramen,"分",CLK_BTN)

2011-12-02

[]なでしこで簡単な再帰呼び出し 14:48 はてなブックマーク - なでしこで簡単な再帰呼び出し - 教えてなでしこ

0のテスト
●テスト(Aの)
	もし、Aが100ならば
		抜ける
	違えば
		Aを表示
		0.01秒待つ
		A+1のテストで戻る
	

2011-10-09

[]デスクトップファイル削除ツール作成機を作った 21:57 はてなブックマーク - デスクトップファイル削除ツール作成機を作った - 教えてなでしこ

同じようなプログラムを何度も書き捨てていたので、自動化した。

これでいろんな拡張子のファイルを1クリックで削除するスクリプトを手軽に作成できる。

#ファイル削除ツール作成機
※【なでしこ実行モード】cnako
CNAKOモードは「CON」
窓アクティブハンドル取得
HANはそれ
HANに「ファイル削除ツール作成機」を窓ハンドルテキスト設定
D=デスクトップ
ダイアログ初期値は「(.*zip|.*rar|.*exe)」
「マッチ条件を入力してください」と尋ねる
削除ファイルはそれ

テンプレート="D=デスクトップ
ファイル一覧=
フォルダ一覧=
マッチ条件=「{削除ファイル}」
Dをファイル列挙
ファイル一覧はそれ
Dをフォルダ列挙
フォルダ一覧はそれ

ファイル一覧を反復
	対象をマッチ条件で正規表現マッチ
	もし、それが空でなければ
		D&対象をファイル完全削除
		D&対象&「を削除しました。」と表示
"
削除ファイルを文字列ファイル名変換
テンプレートをD&それ&"削除.nako"に保存


2011-06-30

[]rubyで特定URLのソースをダウンロードし、一行ずつ表示する 20:18 はてなブックマーク - rubyで特定URLのソースをダウンロードし、一行ずつ表示する - 教えてなでしこ

require 'open-uri'
require 'kconv'

url="http://b.hatena.ne.jp/kkk6/"
open(url){|f|
f.each_line{|line|print(Kconv.tosjis(line))}
}