Visio 2010 ステンシル一覧

「Visio 2007 ステンシル一覧」で愚痴っていた部分一致検索にはVisio 2010 も対応していないようです。
ということで、今回もキャプりました。
何だかアイコンがカッコ良くなった・・・ような気がしないでもない。

（もう巷では2013が出てるとか出てないとか・・・。）

Windows 2008 Server で wmv ファイルが見れない

Windows 2008 Server で wmv ファイルを見るには
デスクトップ エクスペリエンスを有効にする必要があります。
操作手順は以下の通りです。

「サーバマネージャ」→「機能の追加」→「デスクトップ エクスペリエンス」

【参考】
Windows Server 2008 を実行しているコンピュータで Windows Vista のユーザー エクスペリエンス機能を有効にする方法
http://support.microsoft.com/kb/947036


あまり2008 Server上で動画を見ることがないので、気づきませんでした。

Visual Studio 2012 「コントローラーに移動」がない

ASP.NET MVC 開発でビューとコントローラーを移動する便利な機能が
Visual Studio にあります。
（「ビューに移動」「コントローラーに移動」 Go to View / Go to Controller (Ctrl-M Ctrl-G)）

が、Visual Studio 2012 に「コントローラーに移動」が見当たりません（泣）

同様の症状の方も居るみたいですが、バグなのでしょうか・・・。
http://forums.asp.net/t/1840247.aspx/
http://connect.microsoft.com/VisualStudio/feedback/details/775830/go-to-controller-option-missing-from-the-right-click-context-menu

ちなみに、ショートカットキー（Ctrl-M, Ctrl-G）を打つと
「現在使用できないコマンドにバインドされています」
と出てエラーになります。

【VBScript】800A0036 800A003E ファイル操作エラー

詰まったので、メモ

VBScriptで、
「あるファイルを開き、ある文字列が書かれていれば何もしない、
書かれていなければその文字列を追記する」
という要件があったのですが、

800A0036「ファイルのモードが不正です」
800A003E「ファイルの最期を超えた入力を行おうとしました」

などのエラーが頻発。

テキストストリームオブジェクトの
　AtEndOfStream
　ReadAll
などは「読み取りモード」でないと動作せず、
　Write
　WriteLine
メソッドなどは書き込みモードでないと動作しないことが原因でした。

Dim fs
Set fs = WScript.CreateObject("Scripting.FileSystemObject")
Dim ts
Set ts = fs.OpenTextFile(FilePath,1,True) 'いったん読み取りで開く

Dim filebody
If ts.AtEndOfStream Then
 filebody = ""
Else
 filebody = ts.ReadAll
End If
ts.Close

Set ts = fs.OpenTextFile(FilePath,8,True) '書き込みで開き直す

'---------------何か書き込むコード--------------

ts.Close

Set ts = fs.OpenTextFile(FilePath,1,True) '再度読み取りで開く

'---------------書き込み結果を処理（メール送信など）するコード--------------

ts.Close
Set fs = Nothing

なかなか煩わしいですね・・・。

FileSystemObjectに関する詳細は こちら