VBS

【VBScript】数値を漢数字に変換する

数値を漢数字に変換するプログラム Function KanSuuK(num) Kingaku=0 '0=漢数字 1=金額漢数字 If Kingaku=0 Then saKeta=Array("","万","億","兆","京","垓","𥝱","穣","溝","澗","正","載","極","恒河沙","阿僧祇","那由他","不可思議","無量大数") Else sa…

ADODB.StreamのCharsetプロパティに設定できる値

ADODB.StreamのCharsetプロパティに設定できる値 ○Charsetプロパティ セットできる値は HKEY_CLASSES_ROOT\MIME\Database\Charset のサブキー一覧の中から選択できますTypeプロパティがadTypeText=2の時に機能します ※Charsetを列挙する方法 ①PwerShellを使…

【VBS】ドラッグ&ドロップで結合ファイルを作成する

下のコードをテキストファイルにコピーして「MargeTextFile.vbs」とでも名前を付けて保存してください。このvbsファイルに複数選択したテキストファイルをドラッグ&ドロップするとマージされたファイル「Marge.txt」ができます。MargeTextFile.vbs if WScrip…