動きゃ良い。周辺処理とバッチをキックするWinシェル。拡張子.vbs

'■設藹??
Dim regExDel
regExDel = "\.mp3|\.MP3|\.flv|\.wmv"

Dim thisFileName
Dim batFileName
Dim listFileName
thisFileName = "songs_file_kick.vbs"
batFileName = "songs_file_setting.bat"
listFileName ="songs_filelist.txt"

Dim objShell
Dim curDir
Set objShell = WScript.CreateObject("WScript.Shell")
curDir = objShell.CurrentDirectory

Dim batFile
Dim listFile
Dim tempFile
Dim tempFile2
batFile = curDir + "\" + batFileName
listFile = curDir + "\" + listFileName
tempFile = curDir + "\songs_filelist_tmp.txt"
tempFile2 = curDir + "\songs_filelist_tmp2.txt"

'■バッチ実行--ファイル名藹??得
'バッチ処理終了まで藹??縺?
objShell.Run batFile + " " + listFileName,1,true
Set objShell = Nothing

'■拡張子の削髯?
Set fso = CreateObject("Scripting.FileSystemObject")
Set regEx = New RegExp
Set inFile = fso.OpenTextFile(listFile)
Set outFile = fso.CreateTextFile(tempFile)

regEx.Pattern = regExDel
repStr = ""
Do Until inFile.AtEndOfStream
    tempLine = inFile.ReadLine
    repLine = regEx.Replace(tempLine, repStr)
    repLine2 = regEx.Replace(repLine, repStr)
    outFile.WriteLine repLine2
Loop
inFile.Close
outFile.Close

'■ファイル名の削髯?
Set inFile = fso.OpenTextFile(tempFile)
Set outFile = fso.CreateTextFile(tempFile2)

tempText = inFile.ReadAll
tempText = Replace(tempText, thisFileName + vbCrLf, "")
tempText = Replace(tempText, batFileName + vbCrLf, "")
tempText = Replace(tempText, listFileName + vbCrLf, "")
tempText = Replace(tempText, "songs_filelist_tmp.txt"+vbCrLf, "")
tempText = Replace(tempText, "songs_filelist_tmp2.txt"+vbCrLf, "")
outFile.Write(tempText)
inFile.Close
outFile.Close

'■旧リストファイルを削髯?
fso.DeleteFile listFile, True
fso.DeleteFile tempFile, True

'■新リストファイルを本ファイルにリネーム
fso.MoveFile tempFile2,listFile

If Err.Number = 0 Then
WScript.Echo "リストを出力しました [" + listFileName + "]"
Else
WScript.Echo "エラ繝?: " & Err.Description
End If

Set fso = Nothing

※関連ページ・??キックするバッチファイル・??
http://blog.bangboo.com/page_289.html

---------------------------------------------------
■嘘の情報に觸??をつけろ
カレントディレクトリに藹??得
vbsファイルの場所でな縺?、実行プログラム(例：c:\program\listcam)の場所を指す
Set objWshShell = CreateObject("WScript.Shell")
Msbbox objWshShell.CurrentDirectory

コマンドプロンプトcmd.exeでバッチファイルを作成。拡張子.bat

rem ■■■ファイル名一覧のテキスト保存■■■

set TARGET_DIR1=F:\songs

set CURRENT_DIR=%CD%
set LISTFILE=%CURRENT_DIR%\filelist.txt
'キックファイルから引数でファイルリスト名が渡される場合
'set LISTFILE=%CURRENT_DIR%\%1

cd /d %TARGET_DIR1%
dir /b > %LISTFILE%
echo; >> %LISTFILE%

echo 終了
pause

---------------------------------
※觸??準コマンドでテキスト内の文字列の編集は難しい、WSH(VBscript,JS)を使う
>　リダイレクト
>>　追加
REM　注釈
ECHO　表示
SET　変数設定、%hoge%で藹??り出す
DIR　ディレクトリ情蝣? /bオプションでファイル名
CD　カレントディレクトリ、藹??はチェンジディレクト繝?

※関連ページ・??キック元）
http://blog.bangboo.com/page_290.html

テクニッ繧?
-------------
- ぼかし
- 色彩
- 色觸??す
- トラッキン繧?
- 文字エフェクト（カーソ繝?
- パーティク繝?
- 早回し
繝?イ繧?
光
重縺?
オーディオ同期

撮影
-------------
スモー繧?
照譏?
レン繧?
ピント/ボケ足

フロー・??映蜒?・動画・編集）
-------------
ストーリーを考える
時間割りを考える
ネタを作る

操作
-------------
部分にエフェクト→キーフレーム笳?を設藹??する
藹??り消し→名前をBackSpaceで削除する
適藹??→要素を対象にドラッグ・??ドロップ

書き出し
-------------
メニュー・??コンポジションで鐔??う
書き出し先のファイル名の拡張子が変繧?るエラー→ファイルの場所を再指定
QTとかH264（m4v縺?wav縺?xmpsessに分かれる)とかwmvで出す→画質の差が不譏?、使えれ縺?OK
プレミアで音や必要なら速度調謨?

プレミ繧?TIPS
-------------
クリップを選択し笳?でキーフレームを追加

xrea+からcore miniへ移行した

■サポートから縺?Xrea+からCORESERVERへの移行手順
1）CORESERVERアカウント藹??得
CORESERVERアカウント未藹??得の場合はアカウントを藹??得して縺?ださい。
https://www.value-domain.com/howto/?action=coresv_web&noheader=1

2）データ移動
移動先サーバ繝?(CORESERVER)のサーバー間コピー觸??能をお使いいただき、移動元サーバ繝?(XREA)の情報を移動して縺?ださい。FTP接続でデータを転送されても問題ございません。

3）ドメインウェブ設藹??(ドメインをお持ちの場合)
移動先サーバ繝?(CORESERVER)のドメインウェブ設藹??にドメイン情報を設藹??して縺?ださい
※強制にチェックをつけ設藹??をお願いいたします。

4）DNS設藹??(ドメインをお持ちの場合)
ドメイン縺?DNS設藹??画面を開いていただき、自動設藹??にて藹??得いただいたCORESERVERをお選びいただき、保存して縺?ださい。

5）ドメインウェブ設藹??削髯?(ドメインをお持ちの場合)
移動元サーバ繝?(XREA)のドメインウェブ設藹??を削除して縺?ださい。
窶?DNSが切り替繧?り新しいサーバに名前解決するの縺?10分縺?らいだった、俺のネットで縺?

■手順（はじめは新旧のアカウント系データを全てメモる）
1)DBデータを新サーバへコピーする
2)FTPデータを新サーバへコピーする（htaccess認証かける)
3)Cronの設定をコピ繝?
4)メールを新サーバへ設定
5)WEBプログラム内の設定（DBパスワード、メール設定、フルパス、htacces/pwdをテスト用に・??
6)その臀??設藹??(DBバックアップ）を新サーバへ設定
7)テスト
8)元画面と新画面をメンテナンス中にする（全アクセスメンテ中ページに転送）
9)DB最新データを移鐔??する
10)DNSを切り替える（旧サーバは同期強制転送の設定）
11)ドメインのメールの設定
12)WEBプログラム内の設定（DBパスワード、メール設定、フルパス、htacces/pwdを本番用に・??
13)テスト(ライブ環藹??テスト中は鐔??証を觸??けた、IPでのアクセス制限がいい）
14)メンテ中を外す

■メンテナンス中 htaccess
192.168.0.4や192.168.0.5の部分には、管理者縺?IPアドレスを書きます。
Sun, 14 Jun 2009 06:00:00 GMTの部分には、メンテ終了予定時蛻?
↓
RewriteEngine on
RewriteCond %{REMOTE_ADDR} !=121.2.33.235
RewriteRule ^503/ - [L]
RewriteRule ^.*$ 503/503.php

<IfModule mod_headers.c>
  Header set Retry-After "Wed, 18 Aug 2010 9:00:00 GMT"
</IfModule>

--503/503.php
<?php
header ('HTTP/1.0 503 Service Temporarily Unavailable');
include(dirname(__FILE__) . '/maintenance.html');
?>

///////////////oがold縺?nがnew
<html>
Sorry, the site is currently under maintenance
現在メンテナンス臀??業のため当サービスを一時停止しております
--------------------------------------------------------
ご利用の皆様にはご不便をおかけし大藹??申し訳ございません。
メンテナンス軆??了まで臀??しばら縺?お待ち縺?ださい。
o
</html>
<html>
Sorry, the site is currently under maintenance
現在メンテナンス臀??業のため当サービスを一時停止しております
--------------------------------------------------------
ご利用の皆様にはご不便をおかけし大藹??申し訳ございません。
メンテナンス軆??了まで臀??しばら縺?お待ち縺?ださい。
n
</html>

■移転 htaccess
Options +FollowSymLinks
RewriteEngine on
RewriteRule (.*) http://www.newdomain.com/$1 [R=301,L]
or
Redirect 301 / http://www.newdomain.com/
or
Redirect permanent /2009/Old/ http://www.exsample.com/2009/New/

■DBバックアップ
ダンプを藹??るシェルをクロンで起動
http://www.multiburst.net/project-multiburst/archives/2006/01/21/1559.php
#!/bin/sh
# バックアップで觸??してお縺?日謨?
keepday=14

# バックアップを置縺?ディレクト繝?
dest=/virtual/myid/db-backup

# MySQLのダンプ処理(とりあえず一時ファイルとして臀??存)
/usr/local/mysql/bin/mysqldump -u ユーザ名 --password='xxxxxx' --opt データベース名 > /virtual/myid/db-backup/tmp

# 改めてバックアップ元ファイルとして指定
srcfile=/virtual/myid/db-backup/tmp

# タイムスタンプの藹??得
timestamp=`date +%Y%m%d`
old_date=`date "-d$keepday days ago" +%Y%m%d`

bkfile=$dest/$timestamp.tar.gz

tar zcvf $bkfile $srcfile
# > /dev/null 2>&1

if [ $? != 0 -o ! -e $bkfile ]; then
echo "backup faild -- ($srcfile)"
exit 1
fi

rmfile=$dest/$old_date.tar.gz

if [ -e $rmfile ]; then
rm -f $rmfile
fi

rm -f /virtual/myid/db-backup/tmp

exit

OS WindowsXPを軽驥?化する

■ページングファイルを使用しない
マイコンピュー繧?>プロパテ繧?>詳細設藹??>パフォーマン繧?>詳細設藹??>仮想メモ繝?>変譖?
リストからページングファイルがあるドライブ（ここでは「C:」）をクリックして「ページングファイルなし」

■すべてのカーネルをメモリに置きアクセスを高速化
ファイル名を指定して藹??行「regedit」
HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\SessionManager\MemoryManagement
「DisablePagingExecutive」エントリをダブルクリックして、値のデータに「1」を入力。初期値は「0」

■メモ繝? を最適化する
ファイル名を指定して藹??行「regedit」
HKEY_LOCAL_MACHINE・?SYSTEM・?CurrentControlSet・?Control・?Session Manager・?Memory Management
[IoPageLockLimit] をダブルクリック。[DWORD値の編集] ウィンドウ縺? [表鐔??] 項目縺? [10騾?]
[IoPageLockLimit] が見当たらない場合、ウィンドウ右の空きスペースで右クリックし [新鐔??] → [DWORD蛟?]  で新たな値を作成。値の名前を [IoPageLockLimit] に藹??更する
1・?初期値縺?128MBのメモリで設定されている。
2・?入力縺?B（バイト）数で入力する
3・?512MB搭鐔??メモリなら「2000000～4000000」（*）が適藹??。
4・?1GB以臀??搭鐔??メモリでも「8000000」（*）が適藹??

■エラー報告は無蜉?
「マイコンピュータ」「プロパティ」詳細設藹?? > エラー報告

■msconfigで自動スタートアップを停豁?
スタート→ファイル名を指定して藹??行→「msconfig」と入力して「OK」。
スタートアップタブの中から、不要なもののチェックをはずす。

■使繧?ないスタートアップメニューを削髯?
スタート＞すべてのプログラム＞スタートアップ。
不要な項目を右クリック。表示されたメニューより「削除」をクリック。

■サービス停豁?
---無蜉?----------
Error Reporting Serviceエラー時の「ご迷惑をかけて…」のメッセージ。MSに情報觸??供したい人以外は無効。
Fast User Switching Compatibility ユーザー切り替えを高速に鐔??う。一人で使っている場合は藹??要ない。
Telephony OSインストール時のライセンス鐔??証とダイアルアップの使用時に使繧?れる。が、ネットワーク縺?LAN接続している人は使繧?ない。 無蜉?
Remote Registry 他縺?PCのレジストリを操作するのに使用。セキュリティ臀??好まし縺?ない機能なので無効。
---無効縺?OK---------
Remote Desktop Help Session Manager　リモートアシスタントを利用するときに使繧?れる。無蜉?
Telnet Telnetサーバを觸??供。無蜉?
Remote Access Auto Connection Manager　プログラムがリモート DNS、NetBIOS 名また縺? NetBIOS アドレスを藹??照するときに、リモート ネットワークへの接続を作成。IE以藹??のソフトから自動的にダイアルアップ接続をするものなので、ダイアルアップの人は手動。
---使用時以藹??無蜉?---------
Routing & Remote Access Windows NTのリモート・アクセス・サービス・??RAS）とネットワーク觸??能を統合し、さらにルーティングやパケット・フィルタリング、マルチキャスト、VPN、NAT、セキュリティなどの觸??能を追加
Terminal Services 他のパソコンのデスクトップを表示して操作する「ターミナル」機能を觸??供する
Upload Manager ネットワーク臀??のクライアントとサーバー間におけるファイルの同期/非同期を管理する。
NetMeeting Remote Desktop Sharing　NetMeetingを使ってリモートからデスクトップにアクセス臀??を許可する。NetMeetingを使用しない場合無効。

1. [スタート]－[ファイル名を指定して藹??行] から diskmgmt.msc を起動します。
2. 問題のディスクを右クリックし、[形藹??の異なるディスクのインポート] をクリックします。

■OSのライセンス鐔??証は電話で・??
プロダクトキーのシールは本臀??に張られていなければならない
プリインストール用縺?CD？
何年も前縺?PCなので分からない、複数台あるし、、、

///事前手順
-デスクトップのデータを退驕?
-ブックマークをファイルへ出力
-FTPの設定をファイルへ出力
-メールデータをファイルへ出力、重要なもののみ個別コピ繝?
-メールアカウントをメ繝?
-メール臀??分けをファイルへ出力
-メールフォルダをメ繝?
-iPodのプレイリストをファイルへ出力、Podcastをメ繝?

///事後
-Ramディスクの設定
-XPの軽驥?化
-隠しフォルダ・拡張子の表示、フォルダ並縺?
-事前処理の逆
-アプリ・フォントのインストー繝?

■ショットサイズ　アップほど強い印象
ロングショット＝状觸??説譏?
フルショット
ウエストショット
バストショット
クロースアップ
ビッグクロースアップ＝気持縺?

■アング繝?
アイレベル・??目饅??、ふつう
ローアングル・??視聴者に圧力や圧迫を荳?える
繝?イアングル・??視聴者に対象の弱さを感じさせる
俯瞰・??状觸??説譏?
3Feet=アイレベルより菴?い90cmを繝?リウッドでよく使う

■位鄂?
基本は対象を真ん中に配鄂?
配置を変えると印象が変繧?る

■カメラ　撮影中はズームを使繧?ない方が良い映蜒?になりやすい
固藹??カメラ・??fix撮影、安心感を荳?える
パン・??水平首フリ、広い範囲を見せる、人は左から右を見る
ティルト＝上下首フリ、希望などの印象を荳?える
ズームイン・??見せたいものへ意識の鐔??蟆?
ズームアウト＝緊張を緩めたり客観性を荳?える
ドリー・??カメラの臀??置が変繧?るのでズームより強い

■編集　大きさの違うショットを組み合繧?せ印象を作る
インサート＝映蜒?に臀??の映蜒?を挟み込みテンポや印象を作り出す
方向＝向きや動きを合繧?せる

■髻?
BGM＝映蜒?動画の持つ印象を大きく変える
効果音・??画面に映っていないものを表現できる

http://www.youtube.com/watch?v=puGVyFKxyt0