「ちょっと調べます」のその後

データベース、データファイルへの接続文字列（ConnectionString）のリファレンスサイト。

ConnectionStrings.com

Word/Excel/PowerPoint 2007 ファイル形式用 Microsoft Office 互換機能パック

Microsoft Office 互換機能パックをインストールして、2007 Office プログラムで作成したファイルを以前のバージョンの Excel、PowerPoint、および Word で開いたり保存したりできるようにする方法

Seagateからのお知らせ

Barracuda 7200.11 および ES.2 SATA、DiamondMax 22 ドライブのファームウェアに関する重要なお知らせ [207931]

以下、各社対応。

————————————————————

NEC ニュースリリース

対象製品の詳細

２００８年９月から２００９年１月に出荷した個人向けデスクトップパソコン「VALUESTAR」のうち以下の型番／構成コードの製品の一部が対象です。
●個人向け店頭販売モデル  （型番をご参照ください）
２００８年９月発売製品
PC-VN770RG    PC-VN750RG    PC-VW790RG    PC-VW770RG    PC-VW500RG
PC-VL500RG    PC-VL300RG    PC-VM100RH    PC-VR730RG     PC-VR330RG

●個人向けＷｅｂ直販専用モデル
（PC-で始まる２０桁の構成コードの右から６桁目と７桁目をご参照ください）
※ 構成コード中の「*」には任意の英数字１文字が入ります。
いずれも、320GBまたは500GBのハードディスク搭載モデルが対象です。
（500GB×2、500GB×4のようなRAID構成で500GBハードディスクが搭載されているモデルを含みます。）
２００８年９月発売製品
PC-GV********GC*****    PC-GV********HC*****    PC-GV********LC*****
PC-GV********NC*****    PC-GV********RC*****
注：「VALUESTAR G タイプN」の16型液晶モデルは除きます。

２００９年１月発売製品
PC-GV********GD*****
注：「VALUESTAR G タイプN」の16型液晶モデルは除きます。

————————————————————

富士通 ニュースリリース

対象機種一覧

FMV-DESKPOWER Fシリーズ

発表時期	品名	型名
2009年春	FMV-DESKPOWER F/C70D	FMVFC70D、FMVFC70DK、FMVFC70DZ
	FMV-DESKPOWER F/C70N	FMVFC70NB
2008年秋冬	FMV-DESKPOWER F/B70T	FMVFB70T、FMVFB70TJ、FMVFB70TE
	FMV-DESKPOWER F/B70N	FMVFB70N5、FMVFB70NT

FMV-DESKPOWER LXシリーズ

発表時期	品名	型名
2009年春	FMV-DESKPOWER LX/C90D	FMVLXC90D、FMVLXC90DG
	FMV-DESKPOWER LX/C70D	FMVLXC70D
	FMV-DESKPOWER LX/C90N	FMVLXC90NA
	FMV-DESKPOWER LX/C70N	FMVLXC70NA
2008年秋冬	FMV-DESKPOWER LX/B90D	FMVLXB90D、FMVLXB90DG、FMVLXB90DE
	FMV-DESKPOWER LX/B80D	FMVLXB80D、FMVLXB80DZ、FMVLXB80DE
	FMV-DESKPOWER LX/B70D	FMVLXB70D、FMVLXB70DE
	FMV-DESKPOWER LX/B50D	FMVLXB50D
	FMV-DESKPOWER LX/B90N	FMVLXB90NA
	FMV-DESKPOWER LX/B80N	FMVLXB80NA
	FMV-DESKPOWER LX/B70N	FMVLXB70NA、FMVLXB70NB
	FMV-DESKPOWER LX/B50N	FMVLXB50NA、FMVLXB50NB

FMV-DESKPOWER EKシリーズ

発表時期	品名	型名
2009年春	FMV-DESKPOWER EK/C50N	FMVEKC50N5
	FMV-DESKPOWER EK/C30N	FMVEKC30N5

FMV-DESKPOWER CEシリーズ

発表時期	品名	型名
2009年春	FMV-DESKPOWER CE/C90	FMVCEC90
	FMV-DESKPOWER CE/C50	FMVCEC50
	FMV-DESKPOWER CE/C90N	FMVCEC90N5
	FMV-DESKPOWER CE/C50N	FMVCEC50N5
	FMV-DESKPOWER CE/C40N	FMVCEC40N5
	FMV-DESKPOWER CE/C35N	FMVCEC35N5
2008年秋冬	FMV-DESKPOWER CE/B90	FMVCEB90
	FMV-DESKPOWER CE/B50	FMVCEB50、FMVCEB50E
	FMV-DESKPOWER CE/B90N	FMVCEB90N5
	FMV-DESKPOWER CE/B50N	FMVCEB50N5

FMV-TEOシリーズ

発表時期	品名	型名
2009年春	FMV-TEO/C90D	FMVTEC90D
	FMV-TEO/C70D	FMVTEC70D
	FMV-TEO/C90N	FMVTEC90NA
	FMV-TEO/C70N	FMVTEC70NA
2008年秋冬	FMV-TEO/B90D	FMVTEB90D
	FMV-TEO/B90N	FMVTEB90NA
	FMV-TEO/B70N	FMVTEB70NA
2008年夏	FMV-TEO/A90D	FMVTEA90D、FMVTEA90DE
	FMV-TEO/A90N	FMVTEA90NA
	FMV-TEO/A70N	FMVTEA70NA

————————————————————

エプソンダイレクト ニュースリリース

該当HDD搭載の可能性がある機種

2008年5月から2009年1月までに販売または修理をおこなった、ディスク容量500GB/750GB/1TBのHDDを搭載した下記デスクトップPC
※なお、2009年1月26日以降、当社にて販売を行った下記製品においては、当該不具合は発生しません。

• Endeavor AT970、CM970
• Endeavor MR3300/3500/6000
• Endeavor MT7800/7900、LX7900
• Endeavor Pro4300/4350/4500/7000

一定の間隔を空けて指定回数分、ネットワークドライブの接続を行うスクリプトです。

常駐して一時間ごとにネットワークドライブの再接続を行う、といったものではありません。繋がれば役目を終えて終了します。

「ネットワークストレージの電源を入れて、バックアップ処理を行いたいけど立ち上がるのを待ってるのも面倒だし…」といった状況でのみ使います（笑）

オプションは、

• /F:　ネットワークの場所(\\SERVER\FOLDER　等）
• /D:　割り当てるデバイス名(Z:　等)
• /U:　ユーザー名
• /P:　パスワード
• /I:　インターバル時間(秒)
• /C:　再試行回数
• /M:　途中経過メッセージを表示する

実際の起動例は、

cscript nduse.vbs /D:Z: /F:\\SERVER\FOLDER /I:10 /C:30 /M

\\SERVER\FOLDER を Z:ドライブに割り当てる。

接続できないときは10秒ごとに、30回リトライする。

途中経過のメッセージを表示する。

最終的に接続ができなかった場合には、ERRORLEVELに9を返しますので、ネットワーク接続がうまくいかなかったらそれ以降の処理はキャンセル、といったバッチが組めます。

バッチ例

cscript nduse.vbs /D:Z: /F:\\SERVER\FOLDER /I:10 /C:30 /M
if errorlevel 9 goto END
コピー処理
:END

注意事項

• 全ての環境でのテストは行っていませんのでうまく動かない場合があります。
  (XPProSP3でのみテスト済み)
• 特にユーザー、パスワードを指定した場合のテストが不十分です。
  (1回しかやっていません)
• 変更、修正はご自由にどうぞ。
• 「バグ」「もっとうまくやれる」情報がありましたら教えていただけると勉強になります。

ダウンロード　nduse.lzh

‘nduse.vbs
‘
’2008/11/17　作成　ADDDRV
‘
‘使用の手引き
‘
‘cscript nduse.vbs /D:ドライブ名 /F:フォルダ名 /U:ユーザー名 /P:パスワード
‘                  /I:待ち時間間隔（秒） /C:試行回数
‘                  /M:（メッセージ表示有り）
‘
‘ネットワークドライブの接続命令を待ち時間間隔を開けて試行回数分発行します
‘接続完了したときはERRORLEVELに0が、失敗した場合は9が返ります
‘
Option Explicit

‘パラメータ
Dim Args

Dim objNetwork      ‘ Networkオブジェクト
Dim NetDrive        ‘ /D:   ドライブ名
Dim NetFolder       ‘ /F:   フォルダ名
Dim NetName         ‘ /U:   ユーザー
Dim NetPass         ‘ /P:   パスワード
Dim intInterval     ‘ /I:   待ち時間
Dim intLoopcount    ‘ /C:   試行回数
Dim intMess         ‘ /M:   メッセージ表示

Dim I

‘パラメータ取得
Set Args = WScript.Arguments

‘ドライブ名の取得
NetDrive = Args.Named(“D”)

‘フォルダ名の取得
NetFolder = Args.Named(“F”)

‘ユーザー名の取得
If Args.Named.Exists(“U”) Then
NetName = Args.Named(“U”)
Else
NetName = “”
End If

‘パスワードの取得
If Args.Named.Exists(“P”) Then
NetPass = Args.Named(“P”)
Else
NetPass = “”
End If

‘待ち時間の取得
If Args.Named.Exists(“I”) Then
If IsNumeric(Args.Named(“I”)) = False Then
WScript.Echo “/I:は数字で指定してください”
WScript.Quit (9)
End If
intInterval = CInt(Args.Named(“I”))
Else
intInterval = 0
End If

‘試行回数の取得
If Args.Named.Exists(“C”) Then
If IsNumeric(Args.Named(“C”)) = False Then
WScript.Echo “/C:は数字で指定してください”
WScript.Quit (9)
End If
intLoopcount = CInt(Args.Named(“C”))
Else
intLoopcount = 1
End If

‘メッセージ表示をする/しない
If Args.Named.Exists(“M”) Then
intMess = True
End If

On Error Resume Next

‘ネットワークオブジェクトの作成
Set objNetwork = WScript.CreateObject(“WScript.Network”)

‘既存のネットワークドライブがあれば切断
objNetwork.RemoveNetworkDrive NetDrive, True, True

If intMess Then
If Err.Number = 0 Then
WScript.Echo “切断完了”
Elseif Err.Number = -2147022646 Then
WScript.Echo “切断完了(既存ドライブなし)”
Else
WScript.Echo “切断:” & Err.Description & “(” & Err.Number & “)”
End If
End If

For I = 1 To intLoopcount

‘ネットワークドライブ接続
objNetwork.MapNetworkDrive NetDrive, NetFolder, False, NetName, NetPass

If Err.Number = 0 Then
If intMess Then
WScript.Echo I & “:割り当て完了”
End If
Set objNetwork = Nothing
WScript.Quit (0)
ElseIf Err.Number = -2147024811 Then
If intMess Then
WScript.Echo I & “:割り当て完了(割り当て済み)”
End If
‘正常終了
Set objNetwork = Nothing
WScript.Quit (0)
Else
If intMess Then
WScript.Echo I & “:接続:” & Err.Description & “(” & Err.Number & “)”
End If
End If
‘待ち時間
If I <> intLoopcount Then
If intMess Then
WScript.Echo intInterval & “秒後に再試行(あと” & intLoopcount – I & “回)”
End If
WScript.Sleep (intInterval * 1000)
End If
Next

‘異常終了
Set objNetwork = Nothing
WScript.Quit (9)

Accessランタイム環境下のMDB,MDEにSQLを発行するスクリプトです。

ランタイム上で動いているMDBのテーブルへの行追加、変更、削除のバッチ処理用です。

MDBと同じディレクトリに、

• edtsql.vbs（スクリプト本体）
• edtsql.sql（一文一行のSQL）

を置いて、コマンドプロンプトから、

cscript edtsql.vbs mdbファイル名.mdb

で、コネクションの情報表示→SQLを表示しつつ実行されます。

注意事項

• テストはしてありますが、書かれているSQL次第で、かなり恐ろしいことになります。
  実行前には必ずMDBのバックアップを取ってください。
  結果的にデータベースその他諸々が破壊されたとしてもなんの保障もできません。
• wscriptを使った実行も可能ですが、いちいちメッセージが出るのでうるさいです。
• WindowsXP + Access2003環境でのみテストしてあります。
  OleDbが使えない場合や2007のACCDBではコネクションストリングの変更が必要です。
  変えれば動くかと言われても未検証なので自信はありません。
• 変更、修正はご自由にどうぞ。
• 「バグ」「もっとうまくやれる」情報がありましたら教えていただけると勉強になります。

ダウンロード　edtsql.lzh

edtsql.vbs

‘edtsql.vbs
‘
’2008/11/13　作成　ADDDRV
‘
‘使用の手引き
‘
‘更新したいMDB,MDEと同じフォルダに置きます
‘実行させるSQLの条件
‘    1.SQLは1行1文です
‘    2.SQLのファイル名は「edtsql.sql」です
‘    3.edtsql.sqlはこのvbsと同じフォルダに置いて下さい
‘

Option Explicit

‘パラメータ
Dim Args

‘パラメータ取得
Set Args = Wscript.Arguments

‘パラメータが無いときはエラー
If Args.Count < 1 Then
WScript.echo “MDBファイル名を指定して下さい”
Else
‘メインの処理
Call subMain
End If

Set Args = Nothing

‘ここで終わり

‘メインの処理
Sub subMain()

‘MDBファイルの名前（パスは、スクリプトと同じ場所）
Dim MDBName

‘MDBファイル名をパラメータからセット）
MDBName = Args(0)

‘ADOコネクションとコネクションストリング
Dim Conn
DIm Conn_String

‘ファイルシステムオブジェクト
Dim objFileSys
Dim objFile

‘SQLが入っているフルパス付ファイル名
Dim FileName

‘現在のパス
Dim FilePath

‘取得したレコード=投げるSQL
Dim Record

‘自パスの取得
FilePath = Replace(WScript.ScriptFullName,WScript.ScriptName,”")

‘ファイルシステムオブジェクトの作成
Set objFileSys = CreateObject(“Scripting.FileSystemObject”)

‘読み込むファイル名をフルパス付きで作成
FileName = objFileSys.BuildPath(FilePath,”edtsql.sql”)

‘ファイルのオープン（ReadOnly）
Set objFile = objFileSys.OpenTextFile(FileName,1)

‘ファイルがあればADOの処理へ
If Err.Number=0 Then

‘ADOコネクション作成
Set Conn = CreateObject(“ADODB.Connection”)
‘コネクションストリング
Conn_String = “Provider=Microsoft.Jet.OLEDB.4.0; Data Source=” & FilePath & MDBName & “;”
WScript.echo “Connecting ” & Conn_String

‘MDBを開く
Conn.Open Conn_String

‘SQLの読み込み開始
Do Until objFile.AtEndOfStream

‘ファイル内容を1行読む
Record = objFile.ReadLine

‘表示しつつExecute
WScript.echo “Execute ” & Record
Conn.Execute Record

Loop

‘ADOクローズ
Conn.Close

Set Conn = Nothing

objFile.Close
Set objFile = Nothing

Else
Wscript.Echo FilePath & “にedtsql.sqlがありませんでした。”
End if

Set objFileSys = Nothing

End sub

シマンテック

Norton 削除ツール (Norton Removal Tool) を使う方法 – 詳細手順

マカフィー

マカフィー・コンシューマー製品がアンインストール出来ない時の対処方法

トレンドマイクロ

ウイルスバスター　アンインストールツール

サーバ/クライアントプログラムのインストール方法、アンインストール方法のリンク集

キングソフト

KINGSOFT FAQ[セキュリティソフト] – アンインストール方法

Kingsoft Internet Security Uをアンインストール

ALWIL Software

avast! アンインストール用ユーティリティ

CoGen Media

AVG　アンインストール方法

ソースネクスト

ウイルスセキュリティ　レジストリ情報削除

ジャストシステム

Kaspersky Anti-Virus 6.0をアンインストールしたい

Kaspersky Internet Security 6.0をアンインストールしたい

Kaspersky Anti-Virus 7.0をアンインストールしたい

Kaspersky Internet Security 7.0をアンインストールしたい

Access2007のaccdb形式や、Excel2007のxlsx,xlsb形式ファイル用のOLEDBドライバ

ダウンロードの詳細 : 2007 Office system ドライバ: データ接続コンポーネント

カナ文字での表記方法

VBA用語読み方一覧表

2003のコマンドと、2007のリボンの対応表

Access リボン マッピング ブック (Excel ブック)

Excel のリボンの対応表 (Excel ブック)

Outlook のリボンの対応表 (Excel ブック)

PowerPoint のリボンの対応表 (Excel ブック)

Word のリボンの対応表 (Excel ブック)

+Shift 起動でも、起動時の設定内容をキャンセルさせない方法

Access データベース (mdb) のスタートアップ オプションを強制または無効にする方法

Access データベース プロジェクトのスタートアップ オプションを強制または無効にする方法

Allow ByPass With Shift Key(設定を行うMDB)