2004-02-01から1ヶ月間の記事一覧
PKWareは.zipフォーマットの考案者であるフィル・カッツ氏が設立した会社で、カッツ氏は2000年に亡くなっている。カッツ氏は.zipフォーマットをオープンスタンダードにすることを決め、プログラムを作ろうとする人なら誰もが仕様を読み、利用することができ…
wotsit.org にあった "BAG ARCHIVE FILE FORMAT V1.1" の適当訳。はてなでは行頭に '-' や '*' が置けないので、ちょっとだけフォーマットを変えている。 シンプルなのは確かだが、圧縮周りはちょっと微妙。圧縮専用にフィールド用意した方がいいよなぁ。LZW…
一方向ハッシュアルゴリズムとして最も有名なのが MD5 (Message Digest 5) だ。 関連する RFC は以下の通り。 RFC 1321 - The MD5 Message-Digest Algorithm ftp://ftp.rfc-editor.org/in-notes/rfc1321.txt RFC 1810 - Report on MD5 Performance ftp://ftp…
「sender@foo.org から trans@bar.net にメールを出した。が、実は trans@bar.net は転送設定がされていて、そのメールは rec@baz.com に転送された」という場合、rec@baz.com に届いたメールで、「誰からきたのか」「どっから転送されてきたのか」を知るこ…
オブジェクトのコレクションに対して、指定されたプロパティで昇順ソートを行う。この場合に固有なのは、最初にキーだけ集めてからソートしている点くらいだけど、これだけでも、1 時間かかってたのが数秒になったりした。所詮バブルソートなので、2000 件の…
WinPack www.ifrance.com/snoopy81/en/winpack.htm コマンドラインツール。InstallSheild の各バージョンごとに exe が用意されている。
していた。ので、FF11 プレイ日記は、個人的な分はこっちで書く……LS 関係は向こうで書く……つまり、はさみうちの形になるな (何)。
Visual Basic Tips(一般)- 省略可能な引数を使用する場合 (RNK's HomePage) http://www.mitene.or.jp/~rnk/TIPS_VB_GEN.htm#LinkParm ここのサンプルで、プロシージャ引数に Optional キーワードをつけた場合の扱いが、「文字列型」「数値型」「Variant 型…
TineLine SVG http://www.tinyline.com/svgt/ J2ME で実装された SVG Tiny レンダリングライブラリ。商用・非商用を問わず無償で利用できる。
ActiveBasic http://www.discover-soft.com/ VB 互換の文法を備えた BASIC 環境。RAD ツールが用意されており、画面上で GUI の設計ができる。ネイティブコンパイラを搭載している点もポイント高し。 ただし Win32 API を直接呼び出して操作していくスタイル…
foo.txt をうっかり「レポジトリから削除」しちゃった! 元の場所に foo.txt を手で作成する。 foo.txt を「追加 (add)」する (この時点ではローカルでのリビジョンが 0 になっていて、「更新 (update)」しようとすると、"A foo.txt" みたいに "A" 付で表示さ…
らしい。というのは、VB でビルドする時デバッグ情報を生成するようにすると、pdb ファイルが作られるが、そのパスが絶対指定で *.exe に埋め込まれる。 なので、別のマシンに持ってく時には注意が必要だ、という話がどこかのサイトにあった。
Borland の営業さんからこんなメールが。 先日、弊社のUSサイトより弊社製品(Delphi 7 Studio Architect )を ダウンロード頂きまして、誠に有難う御座いました。 その後の評価状況は如何でしょうか? 製品に関してのご質問や、今期及び来期予算の為の概算…
バーチャル・プチプチ ・ω・)σ∩プチ http://www.geocities.co.jp/SiliconValley-PaloAlto/5101/madelin/soft/pt.html 上記の Script Decoder と同じサイトにあった。実行すると画面一覧に「ぷちぷち」が表示され、マウスの左クリックでつぶすことができる。 …
Windows Script Encoder は、VBScript または JScript で書かれたスクリプトを暗号化するツールだ。とはいえ暗号強度は低い。ドキュメントには以下のように書かれており、つまり「ぱっと見ではわからない」程度でしかないということだ。 ただし、このツール…
以下の内容で *.vbs ファイルを作成し、ダブルクリックで実行する。 開始日・終了日を聞かれるので、「2004/2/12」みたいな形式で入力すれば、日数 (両端を含む) が表示される。 a = CDate(InputBox("開始日")) b = CDate(InputBox("終了日")) MsgBox a & "…
[XL2002]Excelで用いている閏年の判定方法 http://support.microsoft.com/default.aspx?scid=kb;ja;118923 [XL2002]WEEKDAY関数で1900年3月1日より前の正しい曜日が返らない http://support.microsoft.com/default.aspx?scid=kb;JA;106339 いずれも Microsof…
Enq/「Fedora」をどう発音していますか? http://fedora.jp/wiki/?Enq%2F%A1%D6Fedora%A1%D7%A4%F2%A4%C9%A4%A6%C8%AF%B2%BB%A4%B7%A4%C6%A4%A4%A4%DE%A4%B9%A4%AB%3F 今日正式発足した Fedora JP Project。日本での Fedora Core 普及に向けて、UTF-8 対応の…
以下のスクリプトを使用すると、テキスト形式に変換可能な場合がある。 Const wdFormatText = 2 sFileName = WScript.Arguments(0) Set oDoc = GetObject(sFileName) oDoc.SaveAs sFileName & ".txt", wdFormatText oDoc.Close Set oDoc = Nothing これを、 …
再びウィンダスに。今回はテレポ屋を利用した。 目的はサポ白のレベル上げと、資金稼ぎ。Lv21 になったのでサンダーを買いたいのに、手元に数百ギルしかない。INT 上げの指輪も買いたいし、ジュース類の補充も必要だ。 狙いはスタンダードに絹糸。ほとんど出…
免許取りました。早速乗ったけど、料金 700 ちょいは高いよなぁ。 ウィンダスに着いてほっとしていると、P さん という方から PT のお誘いが。運良く HP はジュノのままだったので、参加させて頂くことにした。デジョンで一瞬。楽だ。 狩場は、俺にとっては…
VB って、予約語をプロパティ名に使えないのを忘れてた。 Type って名前のプロパティを持つクラスを作らなければならないが、VB ではどうやってもできない。 しょうがないので、そのクラスだけ WSC にした。
昨日書いた、Windows Scripting Component だけど、結局使用を断念した。 エラーメッセージがほとんど役に立たない、というのが最大の理由。WSC で定義したオブジェクトを GetObject で取得しようとしたときに、エラーが出ることがある。これは、.wsc ファイ…
エラーになった時の原因がわかりにくいなコレ。オブジェクト生成時のエラーも実行時のエラーも、何が悪いのか知る術がほとんどない。チェック用のツールとかあればいいのにー。とりあえず、エラーになる (なった) ところを並べてみる。 [生成時] XML の構文…
ヘルプから抜粋。 次のコードは、MyComponent.wsc ファイル内に含まれる "math" という ID を持つスクリプト コンポーネントのインスタンスを作成する例です。 Set oComponent = GetObject("script:c:\COM\MyComponent.wsc#math")
Windows Script Components (WSC) は、Windows Scripting を使って COM コンポーネントを実装できるようにしたもの。おおまかな手順としては、XML を使って ProgID やインタフェースなどの公開情報を定義し、VBScript などを使って実装を書く、ということに…
Web ベースのメーラがほしい。現在は代用で Yahoo! Mail を使っているが、From が変更できないのと、広告が挿入されるのが不満だ。 試しに Hotmail と goo フリーメールを試そうとしたが、Hotmail には他のサーバへ POP アクセスする機能がないみたいで、goo…
「Value プロパティで文字列取得→文字列を操作→Value プロパティに設定」という流れでやると、セル内のフォント情報が失われる。正解は Insert メソッド。 Sub ReplaceKeyword(ByVal oRange As Object, ByVal Keyword As String, ByVal Value As String) Dim…
Public Sub シェイプをすべて選択() Dim xlsSheet As Excel.Worksheet Dim xls Set xlsSheet = ActiveWorkbook.ActiveSheet If xlsSheet.Shapes.Count > 0 Then xlsSheet.Shapes.SelectAll Else MsgBox "シェイプがありません。", vbInformation, "シェイプ…
UWSC http://www002.upp.so-net.ne.jp/umiumi/ うみうみさん製作。 マウスやキーボードの操作を記録・再生するツール。BASIC ライクなスクリプトを使って、複雑な操作も自動化可能。繰返し・条件分岐・関数定義などはもちろん、COM オブジェクトも扱えるとい…