Windowsの最近のブログ記事
Set connection = CreateObject( "ADODB.Connection" )
connection_string = "Provider=Microsoft.Jet.OLEDB.4.0; Data Source=MDBファイル;"
connection.Open connection_string
Set rs = CreateObject( "ADODB.Recordset" )
Set rs.ActiveConnection = connection
sql = "SELECT ServerName , Community , Status FROM SERVER_LIST "
rs.Open( sql )
While rs.EOF <> true
s = rs.Fields("ServerName").Value & " " & rs.Fields("Community").Value & " " & rs.Fields("Status").Value
WScript.Echo s
rs.MoveNext()
Wend
rs.close
connection.close
>cscript //nologo ado.vbs
host1 public OK
host2 aaa BAD
>
デスクトップを右クリックすると、反応が遅い。特にノートPCだとツライ
ネタ元
http://papalagi.org/diary/200406.html#20040629
レジストリの「{3AB1675A-CCFF-11D2-8B20-00A0C93CB1F4}」をコメントアウト
ネタ元
http://papalagi.org/diary/200406.html#20040629
以下のコマンドを実行する。
RunDll32 advpack.dll,LaunchINFSection %windir%\INF\msmsgs.inf,BLC.Remove
エクスプローラから→ドライブを右クリック→「ディスクのクリーンアップ」
デフォルトだと空き領域の計算に、圧縮ファイルを使った場合の試算をするので、ファイル数が多いドライブでは恐ろしく時間がかかる。なので、インストールしたらこれを外している。が、毎度検索してしまう・・・。
以下の値を削除する。
デフォルトだと空き領域の計算に、圧縮ファイルを使った場合の試算をするので、ファイル数が多いドライブでは恐ろしく時間がかかる。なので、インストールしたらこれを外している。が、毎度検索してしまう・・・。
以下の値を削除する。
HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\VolumeCaches::Compress old files【コラム】Windows XPスマートチューニング 第64回 ディスククリーンアップから圧縮ファイルを外す (MYCOM PC WEB)
