HP mini 1000のカスタマイズログ

Firefoxが仮想メモリ割り当てでエラー

2009-12-17T00:37:00.002+09:00

HP mini 1000を使って半年が経過したが、最近Firefoxがよく落ちる。
仮想メモリの割り当てに失敗とのこと。

長時間Firefoxを利用していると頻発するため、もう使いものになりません。
特に、Googleのアプリ、GmailやドキュメントなどのAJAX関連との相性が悪い。

というわけで、Google Chromeに変更した。法人でGoogle Appsの独自ドメインサービスを利用しているので、Googleを利用することがほとんどなので。さすがに、Chromeだと早い。安定している。

ただし、一般的にはChrome非対応サイトがおおいし、ToolbarでGoogleBookmarkが使えないのが非常に痛い。

っていうことで

メイン：IE7
サブ：Chrome、とくにGmail、Google Apps、site、blogで利用
な感じになりました。
Firefoxは、しばらくいいや。

BIOSのアップデート

2009-10-19T06:39:00.002+09:00

BIOSをアップデート

HP社のサイトからダウンロード。
NBQA000674　Mini 1000　BIOSのアップデート方法

バージョンは、F15
BIOS Date Version Previous Size
» WinFlash for HP NetBook System BIOS - Microsoft Windows-Based 08-2009 F.15 » Version: 1.12M

あっさり終了。問題なし。
アップデート前に発生していた勝手にパスワードの問題も解決した。

USBメモリからリカバリ　OS用USBメモリ作成編 WIN PE編

2009-08-02T06:10:00.009+09:00

すでにUSBメモリからのOSリカバリはできるようになったのだが、せっかくなので別な方法を試してみる。

WinPEを利用して起動イメージを作成してみる。
以下を参照
http://www.atmarkit.co.jp/fwin2k/win2ktips/1175wpe2usb/wpe2usb.html

1　Windows自動インストールキットの入手
http://www.microsoft.com/downloads/details.aspx?familyid=C7D4BC6D-15F3-4284-9123-679830D629F2&displaylang=ja

2 ダウンロードしたイメージファイルをdaemontoolでマウントする。
vista_6000.16386.061101-2205-LRMAIK_JA.imgファイルをマウント

3　Windows AIK セットアップの実行
STARTCDを実行し、画面を起動
上から2番目のWindows AIK セットアップを選択
次へ、次へと繰り返して先に進む。

4　Windows AIK の起動
［スタート］メニューの［すべてのプログラム］－［Microsoft Windows AIK］－［Windows PE Tools コマンドプロンプト］から起動

5　起動後にコマンドで、起動イメージディレクトリを作成

以下のとおり
－－－－－－－－－－－－－－－
Updating path to include peimg, oscdimg, imagex

C:\Program Files\Windows AIK\Tools\PETools\
C:\Program Files\Windows AIK\Tools\PETools\..\x86

C:\Program Files\Windows AIK\Tools\PETools>copype x86 c:\WINPE

===================================================
Creating Windows PE customization working directory

c:\WINPE
===================================================

1 個のファイルをコピーしました。
1 個のファイルをコピーしました。
C:\Program Files\Windows AIK\Tools\PETools\x86\boot\bcd
C:\Program Files\Windows AIK\Tools\PETools\x86\boot\boot.sdi
C:\Program Files\Windows AIK\Tools\PETools\x86\boot\bootfix.bin
C:\Program Files\Windows AIK\Tools\PETools\x86\boot\etfsboot.com
C:\Program Files\Windows AIK\Tools\PETools\x86\boot\fonts\kor_boot.ttf
C:\Program Files\Windows AIK\Tools\PETools\x86\boot\fonts\wgl4_boot.ttf
9 個のファイルをコピーしました
C:\Program Files\Windows AIK\Tools\PETools\x86\EFI\microsoft\boot\bcd
C:\Program Files\Windows AIK\Tools\PETools\x86\EFI\microsoft\boot\fonts\chs_b
.ttf
C:\Program Files\Windows AIK\Tools\PETools\x86\EFI\microsoft\boot\fonts\cht_b
.ttf
C:\Program Files\Windows AIK\Tools\PETools\x86\EFI\microsoft\boot\fonts\jpn_b
.ttf
C:\Program Files\Windows AIK\Tools\PETools\x86\EFI\microsoft\boot\fonts\kor_b
.ttf
C:\Program Files\Windows AIK\Tools\PETools\x86\EFI\microsoft\boot\fonts\wgl4_
t.ttf
6 個のファイルをコピーしました
1 個のファイルをコピーしました。
1 個のファイルをコピーしました。

Success

Updating path to include peimg, oscdimg, imagex

C:\Program Files\Windows AIK\Tools\PETools\
C:\Program Files\Windows AIK\Tools\PETools\..\x86

－－－－－－－－－－－－－－－

6 diskpartコマンドでのUSBメモリ初期化
以下を参照
http://www.atmarkit.co.jp/fwin2k/win2ktips/1175wpe2usb/wpe2usb.html#initusbmem

vista環境にて、コマンドプロンプトからdiskpartコマンドを実行

以下はコマンド内容
---------------------------------------------------
C:\Users\Borg>diskpart

Microsoft DiskPart バージョン 6.0.6000
Copyright (C) 1999-2007 Microsoft Corporation.
コンピュータ: BORG-PC

DISKPART> list disk

Disk ### Status Size Free Dyn Gpt
-------- --------------- ------- ------- --- ---
Disk 0 オンライン 149 GB 1528 KB
Disk 1 メディアなし 0 B 0 B
Disk 2 オンライン 112 GB 1528 KB
Disk 3 オンライン 7660 MB 0 B
DISKPART> select disk 3
ディスク 3 が選択されました。
DISKPART> clean
DiskPart はディスクを正常にクリーンな状態にしました。
DISKPART> create partition primary
DiskPart は指定したパーティションの作成に成功しました。

DISKPART> select partition 1

パーティション 1 が選択されました。

DISKPART> active

DiskPart は現在のパーティションをアクティブとしてマークしました。

DISKPART> format fs=fat32 quick

100% 完了しました

DiskPart は、ボリュームのフォーマットを完了しました。

DISKPART> assign

DiskPart はドライブ文字またはマウントポイントを正常に割り当てました。

DISKPART> list volume

Volume ### Ltr Label Fs Type Size Status Info
---------- --- ----------- ---- ---------- ------- --------- --------
Volume 0 G DVD-ROM 0 B メディアなし

Volume 1 E HP_OS_RESTO CDFS DVD-ROM 568 MB 正常
* Volume 2 J FAT32 リムーバプル 7658 MB 正常

Volume 3 F Strorage NTFS Partition 112 GB 正常
Volume 4 I リムーバプル 0 B メディアなし

Volume 5 C NTFS Partition 140 GB 正常システム

Volume 6 D HP_RECOVERY NTFS Partition 9 GB 正常

DISKPART> exit

DiskPart を終了しています...

---------------------------------------------------

7　USBメモリへの起動イメージ

5で作成したWINPEフォルダを、フォーマットしたUSBメモリにxコピーする。
コマンドプロンプトから
C:\WINPE\ISO\を、jドライブにコピーする。
以下のとおり。
----------------------------------------
Microsoft Windows [Version 6.0.6000]
Copyright (c) 2006 Microsoft Corporation. All rights reserved.

C:\Users\Borg>xcopy C:\WINPE\ISO\*.* /s/e/h/r J:\
C:\WINPE\ISO\bootmgr
C:\WINPE\ISO\boot\bcd
C:\WINPE\ISO\boot\boot.sdi
C:\WINPE\ISO\boot\bootfix.bin
C:\WINPE\ISO\boot\etfsboot.com
C:\WINPE\ISO\boot\fonts\chs_boot.ttf
C:\WINPE\ISO\boot\fonts\cht_boot.ttf
C:\WINPE\ISO\boot\fonts\jpn_boot.ttf
C:\WINPE\ISO\boot\fonts\kor_boot.ttf
C:\WINPE\ISO\boot\fonts\wgl4_boot.ttf
C:\WINPE\ISO\EFI\microsoft\boot\bcd
C:\WINPE\ISO\EFI\microsoft\boot\fonts\chs_boot.ttf
C:\WINPE\ISO\EFI\microsoft\boot\fonts\cht_boot.ttf
C:\WINPE\ISO\EFI\microsoft\boot\fonts\jpn_boot.ttf
C:\WINPE\ISO\EFI\microsoft\boot\fonts\kor_boot.ttf
C:\WINPE\ISO\EFI\microsoft\boot\fonts\wgl4_boot.ttf
C:\WINPE\ISO\EFI\microsoft\boot\fonts\wgl4_boot.ttf
C:\WINPE\ISO\sources\boot.wim
17 個のファイルをコピーしました

8　完成したusbメモリをmini 1000に挿入してブートデバイスを指定して起動

無事、WINPEが起動しました！

HP mini 1000でBIOSパスワード

2009-08-02T05:58:00.000+09:00

工場出荷状態にリストア後、boot時にF10を押すとBIOSが起動するはずなのに、なぜかパスワード要求が？

設定した覚えがないので、探してみると↓同じような事態が。
biosupdateで直るらしいが、ちょっとそれひどいな。

BIOS SETUPパスワード→解決！ - Dead Zone

USBメモリからリカバリ　OS用USBメモリ作成編

2009-08-01T22:15:00.013+09:00

hp mini 1000のリカバリを実施する。
通常はCDドライブからブートするわけだが、USBのCDドライブがないため別な方法を探る。

どうやら、USBメモリからのブートイメージ作成すればよいみたいなので、せっかくの機会だからリカバリ用USBメモリを作成する。

1　用意するもの
・HP mini 1000付属のリカバリディスク2枚
-オペレーティングシステムCD
-Application and Driver Recovery DVD

・USBメモリ2G

・ドライブ付のPC

・USB_MultiBoot_10.zip
ここを参照
http://orz.kakiko.com/kaeru/usbboot/install_xp_from_usb_memory.html#usb_multiboot
http://project-r.org/eeepc/xpinst-from-usb/

2　USB_MultiBootをダウンロード、解凍。

3　解凍後、USB_MultiBoot_10を実行

4　コマンドプロンプト起動後、キー入力で続行

5　フォーマットタイプを選択
今回は、2GのUSBメモリなのでFATのPeToUSBを選択。pを入力

6　フォーマット開始
PeToUSB が起動。 Destination DriveでターゲットのUSBメモリが選択されていることを確認し、Startボタンをクリック。オプションはデフォルトのまま。

7　Continueを2回。フォーマット実行。
フォーマット終了。

8　コマンドプロンプトにてXPインストールパスの指定
1を選択、enter。

9　XPのインストールメディアCDのドライブを指定。

10　setupパラメータファイルの指定を聞かれる
YES。

11　無人インストールのパラメータ変更有無を聞かれる
Yesで変更する。

12　DefaultUsernameの変更
任意を指定

13　組織名の変更
任意を指定

14　プロダクトキーの指定
表示されたキーのまま。

15　コンピュータ名の指定
任意を指定

16　Adminパスワード指定
任意を指定

17　TIMEZONE指定
235のtokyo指定

18　workgroupの指定
任意を指定

19　useraccount名の指定
任意を指定

20　確認画面
OK

21　コマンドプロンプトにてGIVE TARGET DRIVEを指定する。
2入力でenter

22　ドライブの指定
USBメモリを指定する。

23　コマンドプロンプトにてLANG フォルダをコピーを指定
X入力でenter

24　コマンドプロンプトにてファイルコピーの開始
3入力でenter

25　USBドライブのbootsector変更を聞かれる。
Yes

26　コピー開始
コピー中にコピー範囲を聞いてくる。
YESを選択

27　終了時に確認メッセージ
YESを選択

以上で終了！！！！
全部で30分程度、700MBくらい。

なお、リストア時に作成したUSBメモリ内容が変更されるので、すべてバックアップ（コピー）を取るとよい。

SSDのデフラグアプリケーション

2009-07-30T17:50:00.000+09:00

動きが遅くなってきたのでデフラグ。
デフラグアプリをダウンロードで実行。
SSDの寿命が縮まるというが、そもそもそんなに長く使うPCでもないので遠慮なく。

Defraggler - Defragment your files!

USBメモリからリカバリ

2009-07-30T04:45:00.002+09:00

すぐにリカバリの必要性はないが、CDドライブなしでUSBメモリからのbootでも大丈夫っぽい。
あまったUSBメモリができたら作成してみる。

USBメモリから WindowsXP をインストールする

HP mini 1000の省電力設定

2009-07-19T22:41:00.002+09:00

バッテリーの省電力化のために、デスクトップの壁紙を白に変更

以下を参照
ノートパソコンの壁紙は、黒よりも白の方が省電力？ | エキサイトニュース

効果測定はなし。

HP mini 110のの発表

2009-07-19T20:28:00.003+09:00

HP mini 110が発表されていた。
スペック的には、大きな差がない。
インターフェースで、独自ディスプレイ出力がRGBに、USBポートも独自内蔵型がなくなり通常USBが3ポートに。
http://h50146.www5.hp.com/products/portables/personal/mini110/

HP mini 1000でまだまだ十分。いやコストパフォーマンスがmini1000のほうがおすすめ。

HP mini 1000のXP高速化設定

2009-07-13T13:07:00.000+09:00

以下を参考に設定。

Windows XP 高速化.com

パフォーマンス優先設定やレジストリ値を変更

UQ WiMAXの無料お試しでの検証

2009-07-08T12:48:00.012+09:00

通常はイーモバイル利用だが、短期でWimaxのお試しサービスを申し込んだ
UQ WiMAX | Try WiMAX
http://www.uqwimax.jp/service/trywimax/

以下のwebから申し込み、受付まで1日、機器到着までさらに1日かかった。
レンタル期間は、受付後15日間　（配送日、返却日を含む）なのでちょっと申し込み後のリードタイムが大きいのが気になる。

到着後、早速開梱。
今回は、WiMAX USB TYPE UD01NAを借りたので即mini　1000のUSBポートに挿入
ドライバの自動認識が始まるが、何度かエラーが・・・
再起動2回、手動でのsetup実行でようやくインストール完了

接続後に、速度測定。
自宅マンションで以下速度。イーモバより遅い。次は外出先でTryすることとする。

&amp;amp;amp;amp;amp;amp;lt;script language="javascript" src="http://ad.jp.ap.valuecommerce.com/servlet/jsbanner?sid=2171982&amp;amp;amp;amp;amp;amp;amp;pid=878291739"&amp;amp;amp;amp;amp;amp;gt;&amp;amp;amp;amp;amp;amp;lt;/script&amp;amp;amp;amp;amp;amp;gt;&amp;amp;amp;amp;amp;amp;lt;noscript&amp;amp;amp;amp;amp;amp;gt;&amp;amp;amp;amp;amp;amp;lt;a href="http://ck.jp.ap.valuecommerce.com/servlet/referral?sid=2171982&amp;amp;amp;amp;amp;amp;amp;pid=878291739" target="_blank" &amp;amp;amp;amp;amp;amp;gt;&amp;amp;amp;amp;amp;amp;lt;img src="http://ad.jp.ap.valuecommerce.com/servlet/gifbanner?sid=2171982&amp;amp;amp;amp;amp;amp;amp;pid=878291739" height="60" width="468" border="0"&amp;amp;amp;amp;amp;amp;gt;&amp;amp;amp;amp;amp;amp;lt;/a&amp;amp;amp;amp;amp;amp;gt;&amp;amp;amp;amp;amp;amp;lt;/noscript&amp;amp;amp;amp;amp;amp;gt;

麻布でwimaxの接続を確認。2Mくらい。イーモバも2Mくらいで同じ。
でも、wimaxの接続はちょくちょく切れる。なんだろ？

HP mini 1000でのアプリケーションインストール

2009-07-03T05:15:00.006+09:00

ここでは万一リストアのために、ＨＰ mini 1000に追加インストールしたアプリケーションを残す
一部は個人的な趣向や、環境に依存するのでご参考までに。

1　daemon tools lite
DVDやCDイメージファイルを仮想ドライブにマウントして読み込むためのアプリケーション
ドライブのないHP mini 1000では、USBメモリ経由でのディスクイメージファイル（ISOなど）をマウントして読み込ませるのに必須

2　winrar
圧縮・解凍アプリケーション
個人的に、rarの圧縮率が気に入っている。

3　primo PDF
プリンタ出力の変わりにPDFファイルを作成するソフト。重いが安定してるし、フリーなので。

4　google tool bar
Firefox、IEともにこれがないと。
google tool barからgoogle bookbarkを利用するため必須。PCローカルのお気に入りは絶対使わない。

5　picasa3
写真のuploadに必要。インストールしなくてもブラウザからも写真アップロード可能だが、動画アップロードにはpicasa3のクライアント版が必要なため。

6　quicktime
携帯の動画再生などで必要

7　docomo携帯リンク
携帯のメールやアドレスバックアップをとるため。
ちなみに、メールはバックアップ後にOUTLOOK経由でGmailにアップロードしてしまう。

8　office 2000pro
MS office、もちろん純正品。
iso imageファイルにしているメディア（600Mくらい）をdaemon toolでマウントしてインストール

9　ubuntu wubi
仕事がらlinux環境での検証もいるため、デュアルブートに。詳細はubuntu導入のログを参照

10　Outlookのimap configratoin file
アカウント情報をインポート、特に多数のIMAP接続情報を設定する。

11　win accelerator
win xpの軽量化設定を簡単に。極力スリム化する。

12　あとは個人環境依存
プリンタ　mp770 driver、hp6150 driver
モデム　emobile driver & utilty
印刷　　kokuyo 合わせ名人2(ver3 is require high resolution)
お金管理　moneypartners hyper speed、moneylook

&amp;lt;script language="javascript" src="http://ad.jp.ap.valuecommerce.com/servlet/jsbanner?sid=2171982&amp;amp;amp;pid=878261805"&amp;gt;&amp;lt;/script&amp;gt;&amp;lt;noscript&amp;gt;&amp;lt;a href="http://ck.jp.ap.valuecommerce.com/servlet/referral?sid=2171982&amp;amp;amp;pid=878261805" target="_blank"&amp;gt;&amp;lt;img src="http://ad.jp.ap.valuecommerce.com/servlet/gifbanner?sid=2171982&amp;amp;amp;pid=878261805" height="60" width="468" border="0" /&amp;gt;&amp;lt;/a&amp;gt;&amp;lt;/noscript&amp;gt;

Google Appsによるオンラインストレージ活用　自動メール送信VBA

2009-07-03T04:31:00.004+09:00

Goolge Appsを利用して、作成したGmailアカウントに大量のデータファイルを添付送信して管理するためのツール。

ここでは、大量のファイルを一括で圧縮し、Outlookのメール添付で送信するための自動送信ツールの作成方法を残す。

■必要なもの。
excel、outlook、Gmailアカウント（Appsでも通常アカウントでもよい）
今回は、office2000で作成する。

1　GmailアカウントのIMAP接続を有効化
まずGmailアカウント側でIMAP接続を有効化する。デフォルトでOFFなので忘れずに変更する。
Gmailアカウントでログイン後に、設定でIMAPを有効にする。手順は以下ヘルプを参照
http://mail.google.com/support/bin/answer.py?hl=jp&answer=77695

2　OutlookでIMAP接続アカウントを作成する。
Outlook2000でIMAP接続設定は、以下のヘルプを参照。
http://mail.google.com/support/bin/answer.py?answer=77661
好みに応じて、メール送信のデフォルトアカウントに設定する。

3　エクセルでファイル一括圧縮マクロを作成する。
フォルダにあるファイルをそのままメール添付して格納すると、サイズが大きくなるのとたまにファイルが崩壊するため、個々のファイルを圧縮する。

エクセルで新たにファイルを作成。ツール→マクロ→VisualBasicEditorを実行
VisualBasicEditorにて、挿入→標準モジュールを実行
以下のコードを入れる。なお、エラーハンドリングとかはあんまりいれてない。

これで、
・フォルダパスを指定
・「圧縮済」というフォルダを作成
・指定したフォルダパスの中のファイルをすべて「圧縮済」フォルダにlzh形式で保存する。
というマクロができあがる。

'*****APIの宣言
Public Declare Function Unlha Lib "UNLHA32.DLL" _
(ByVal hWnd As Long, _
ByVal szCmdline As String, _
ByVal Lpstr As String, _
ByVal wsize As Long) As Integer

Sub Make_LZHFile()

Target = InputBox("ディレクトリ名を入力", "ディレクトリの指定", "C:\Windows")

Set FS = CreateObject("Scripting.FileSystemObject")
Set Fol = FS.GetFolder(Target)
Set Fil = Fol.Files
ThisWorkbook.Sheets("Sheet1").UsedRange.Delete

'見出しを付ける
ThisWorkbook.Sheets(1).Range("A1") = "パス"
ThisWorkbook.Sheets(1).Range("B1") = "ファイル名"
ThisWorkbook.Sheets(1).Range("C1") = "ファイル種別"
ThisWorkbook.Sheets(1).Range("D1") = "最終更新日"
ThisWorkbook.Sheets(1).Range("E1") = "フルパス"
ThisWorkbook.Sheets(1).Range("A1:E1").Interior.Color = RGB(0, 0, 0)
ThisWorkbook.Sheets(1).Range("A1:E1").Font.Color = RGB(255, 255, 255)
ThisWorkbook.Sheets(1).Range("A1:Es1").HorizontalAlignment = xlCenter

MkDir Target & "\圧縮済"

i = 2

For Each Fx In Fil
'Path
ThisWorkbook.Sheets(1).Cells(i, 1) = Target
'ファイル名
sFile = Fx.Name
'ファイル名の書き出し
ThisWorkbook.Sheets(1).Cells(i, 2) = sFile
'ファイル種別
sFType = Fx.Type
'最終更新日時の書き出し
ThisWorkbook.Sheets(1).Cells(i, 3) = sFType
'最終更新日
sLMod = Fx.DateLastModified
ThisWorkbook.Sheets(1).Cells(i, 4) = sLMod
'フォルダフルパス
SFull = Target & "\" & sFile
ThisWorkbook.Sheets(1).Cells(i, 5) = SFull

'*****LZH圧縮/解凍コマンド
Dim strLZH As String 'LHAファイル名
Dim strXLS As String '圧縮元のフルパスとファイル名
Dim strCmdTxt As String 'UNLHA32.dllへのコマンド文字列
Dim strResult As String * 5000 '結果情報の戻り文字列

On Error GoTo ErrHandler

'ファイル名の設定
strXLS = SFull
strLZH = Target & "\圧縮済\" & sFile & ".lzh"

'コマンド文字列の生成
'"a"はLZHの圧縮・解凍を選択するスイッチ　a:圧縮、e:解凍
strCmdTxt = "a " & """" & strLZH & """" & " " & """" & strXLS & """"

'書庫ファイルの生成
If Unlha(0, strCmdTxt, strResult, 5000) <> 0 Then
MsgBox "LZH圧縮に失敗しました。　", vbCritical
End If
i = i + 1
Next
Exit Sub

'エラー処理
ErrHandler:
MsgBox Err.Description

End Sub

4　エクセルでOutlookメールへのファイル添付送信マクロを作成する。
次に、上記で圧縮したファイルを、順番にメール添付して送信するマクロを作成する。
モジュール2つにわたる。

4-1　メールアイテム生成
エクセルで新たにファイルを作成。ツール→マクロ→VisualBasicEditorを実行
VisualBasicEditorにて、挿入→標準モジュールを実行
以下のコードを入れる。なお、エラーハンドリングとかはあんまりいれてない。

これで、
・フォルダパスを指定
・その中のファイルを順番にメール添付して送信ボックスに入れる。
というマクロができあがる。
タイトルと本文に、ファイルのフルパスが入るため、Gmail検索時に有効。

Sub CreateMailItem( _
strToMbr As String, _
strCCMbr As String, _
strBCCMbr As String, _
strSbj As String, _
strBdy As String, _
strAdd As String, _
blnRRcpt As Boolean)

Dim objOLApp As Object
Dim objOLItem As Object

Set objOLApp = CreateObject("Outlook.Application")
'※2 宣言したObject変数をOutlookのアプリケーションに設定
Set objOLItem = objOLApp.CreateItem(0)
'※3 宣言したObject変数をOutlookのメールオブジェクトに設定

With objOLItem
.To = strToMbr 'To配信者アドレス
.Cc = strCCMbr 'CC配信者アドレス
.Bcc = strBCCMbr 'BCC配信者アドレス
.Subject = strSbj 'タイトル
.Body = strBdy '本文
.Attachments.Add strAdd '添付
.ReadReceiptRequested = blnRRcpt '開封確認要求
End With

objOLItem.send 'メールの表示(送信箱に移す場合は.send)
End Sub

4-2　メール自動送信
エクセルで新たにファイルを作成。ツール→マクロ→VisualBasicEditorを実行
VisualBasicEditorにて、挿入→標準モジュールを実行
以下のコードを入れる。なお、エラーハンドリングとかはあんまりいれてない。

Sub Make_SendMail()

Target = InputBox("ディレクトリ名を入力", "ディレクトリの指定", "C:\Windows")

Set FS = CreateObject("Scripting.FileSystemObject")
Set Fol = FS.GetFolder(Target)
Set Fil = Fol.Files
ThisWorkbook.Sheets("Sheet1").UsedRange.Delete

'見出しを付ける
ThisWorkbook.Sheets(1).Range("A1") = "パス"
ThisWorkbook.Sheets(1).Range("B1") = "ファイル名"
ThisWorkbook.Sheets(1).Range("C1") = "ファイル種別"
ThisWorkbook.Sheets(1).Range("D1") = "最終更新日"
ThisWorkbook.Sheets(1).Range("E1") = "フルパス"
ThisWorkbook.Sheets(1).Range("A1:E1").Interior.Color = RGB(0, 0, 0)
ThisWorkbook.Sheets(1).Range("A1:E1").Font.Color = RGB(255, 255, 255)
ThisWorkbook.Sheets(1).Range("A1:Es1").HorizontalAlignment = xlCenter

i = 2
For Each Fx In Fil
'Path
ThisWorkbook.Sheets(1).Cells(i, 1) = Target
'ファイル名
sFile = Fx.Name
'ファイル名の書き出し
ThisWorkbook.Sheets(1).Cells(i, 2) = sFile
'ファイル種別
sFType = Fx.Type
'最終更新日時の書き出し
ThisWorkbook.Sheets(1).Cells(i, 3) = sFType
'最終更新日
sLMod = Fx.DateLastModified
ThisWorkbook.Sheets(1).Cells(i, 4) = sLMod
'フォルダフルパス
SFull = Target & "\" & sFile
ThisWorkbook.Sheets(1).Cells(i, 5) = SFull

Dim strToLst As String 'To配信者List
Dim strCCLst As String 'CC配信者List
Dim strBCCLst As String 'BCC配信者List
Dim strMailSbj As String 'タイトル
Dim strMailBdy As String '本文
Dim strMailAdd As String '添付
Dim blnMailRRcpt As Boolean 'ReadReceiptRequested(開封確認要求)

strToLst = "xxxxxx@xxxxxx←ここに送信先のGmailアドレスを入れる"
' strCCLst = "cc1@xxx.yy.zz" & "; " & "cc2@xxx.yy.zz" & "; " & "cc3@xxx.yy.zz"
' strBCCLst = "bcc@xxx.yy.zz" & "; " & "bcc2@xxx.yy.zz" & "; " & "bcc3@xxx.yy.zz"
strMailSbj = ThisWorkbook.Sheets(1).Cells(i, 5)
strMailBdy = ThisWorkbook.Sheets(1).Cells(i, 5)
strMailAdd = ThisWorkbook.Sheets(1).Cells(i, 5)
blnMailRRcpt = False

Module3←ここに4-1で作成した標準モジュール番号を入れる.CreateMailItem strToLst, strCCLst, strBCCLst, strMailSbj, strMailBdy, strMailAdd, blnMailRRcpt

i = i + 1
Next
End Sub

以上。

Google Appsによるオンラインストレージ活用

2009-07-03T04:06:00.007+09:00

hp miniとちょっと離れるが、データ管理方法のはなし。

基本、仕事のデータはPCローカルにおかないルールにしている。
ちょっと前までは、USBメモリで管理していたのだが、紛失や大破するリスクを考えてやめた。

そこでオンラインストレージにデータを格納する。

仕事で使うデータはすべてアップロードすることにしている。
とりわけ、mini 1000のようにディスク容量が少ないPCでは必須である。

各種オンラインストレージサービスが存在するが、容量に応じたコストを考えたり、サービス継続性を比較するのが面倒だったので、Googleを利用することにした。

Gmailを利用したオンラインストレージを格納する方法は、GMail Driveが有名だけど、インストールがいやなのでやめました。
結果、地道にローカルからメール添付でgmailに送付することに。

そして、1アカウントあたりgmailも7Gくらい（2009年6月時点）しか利用できないのと、gmailアカウントを管理するのが面倒なので、以下の手順でちょっとしたコストで大量のオンラインストレージを入手する。

１　Google Appsの独自ドメインサービスを申し込む（有料：ドメイン代10ドル/年）
Google Appsの無料ストレージサービスを有料ドメインで申し込む
http://www.google.com/a/help/intl/ja/admins/editions.html

ドメイン代は、年間10ドルです。ほかのレジストラサービスで申し込んだドメインでもよいので、もう少し安くなる。

これで、自分のドメインで50アカウントまでメールアドレスが作成可能になった。

2　テーマごとにメールアカウントを作成する。
私の場合は、仕事柄プロジェクトを転々とするので、プロジェクトごとにメールアカウントを作成。
AAAA-PJ@<自分のドメイン名>
みたいな感じ。
あとは、プロジェクトでのドキュメントや資料は、このアドレスにメール添付で送るだけ。
必要なときだけ、そのアカウントでログインしてメール検索で探すといった感じです。

３　メール添付の方法
大量のファイルが有る場合は、フォルダ内のファイルを自動で圧縮・メール添付して送信するようにエクセルを利用したVBAマクロを作成。
そのVBAマクロの内容は次回・・・。

HP mini 1000のメモリ増設

2009-06-27T18:40:00.012+09:00

RAMディスク導入により標準1Gのメモリのうち、128Mを常時利用する状態になった。

やはり2Gにメモリ増設するべきか？

メモリの使用状態を確認してみる。OSでは1G認識、firefoxで8タブ起動状態で500MB。

うーん、もう少し様子見にする。

メモリは、DDR2の800の2G。

バッファローだとD2/N800-2G、まあバルク品だと2000円くらいなのでそのうち。

&amp;lt;script language="javascript" src="http://ad.jp.ap.valuecommerce.com/servlet/jsbanner?sid=2171982&amp;amp;pid=878261845"&amp;gt;&amp;lt;/script&amp;gt;&amp;lt;noscript&amp;gt;&amp;lt;a href="http://ck.jp.ap.valuecommerce.com/servlet/referral?sid=2171982&amp;amp;pid=878261845" target="_blank" &amp;gt;&amp;lt;img src="http://ad.jp.ap.valuecommerce.com/servlet/gifbanner?sid=2171982&amp;amp;pid=878261845" height="60" width="468" border="0"&amp;gt;&amp;lt;/a&amp;gt;&amp;lt;/noscript&amp;gt;

HP mini 1000のプチフリーズ対策4　Firefox導入とRAMディスク化・高速化

2009-06-24T19:07:00.018+09:00

Firefoxのインストールと各種設定

1　Firefoxをインスト
以下からダウンロードして普通にインストール
http://mozilla.jp/firefox/download/

2　Firefoxの高速化アドインを導入
以下からダウンロードして設定。
https://addons.mozilla.org/ja/firefox/addon/9148

3　firefoxのキャッシュをRAMディスクに設定

Firefoxのキャッシュ管理フォルダを開く
C:\Documents and Settings\User\Application Data\Mozilla\Firefox\Profiles
の
xxxxxxdefaultフォルダを開く

このフォルダに、user.jsファイルを生成して以下のようにRAMディスクのパスを入れる
user_pref("browser.cache.disk.parent_directory","ドライブ名:\XXXXXXXX");

Firefoxを起動し、URLアドレスに「about:config」を入力

以下エントリが正常に入っていることを確認。
browser.cache.disk.parent_directory;Z:\firefoxcash

HP mini 1000のプチフリーズ対策3 RAMディスク導入

2009-06-24T18:07:00.021+09:00

プチフリ対策としてRAMディスクを導入する。

Gavotte RamdiskとRamPhantom3を比較した結果、特にバックアップ機能や大きなRAM領域も不要のため、設定と取り扱いが簡単そうなRamPhantom3　Free版を利用する。

1　RamPhantom3 Free版をダウンロード
http://www.ioplaza.jp/shop/contents/09ramsoftdl.aspx

2　保存したファイルを実行
RamP3FREE_102.exeを実行すると、RamP3FREE_102のフォルダができる。

マニュアルがよくできている。

3　インストール開始
RamPhantom3FREE.exeを実行
以下のとおり、順にクリックして再起動する。

4　再起動後、RAMドライブ設定
設定は非常に簡単。
ドライブレターをI→Zに固定。（再起動不要）
サイズはdefaultの128mのまま。

HP mini 1000のプチフリーズ対策2 flashpoint導入

2009-06-17T00:22:00.003+09:00

SSDのフリーズ対策として、flashpointを導入する。
1　ダウンロードhttp://www.cc.gatech.edu/~hkim362/project/flashpoint.html
2　InstallUpperSSD.infを右クリでインストール
3　OS再起動

■結果
flashpoint導入後、体感的にフリーズはなくなった様子。とりあえず、cristaldiskmarkで以前の状態と比較してみる。
！！が、ブルースクリーンが！！！
その後もたまにブルースクリーンが発生するため、アンインスト。アンインストーラーがないため、レジストリから削除。

HP mini 1000のプチフリーズ対策1 windows設定

2009-06-10T17:41:00.010+09:00

mini 1000使用から3日、OSの動きが一瞬とまる。

なんかおかしい。

価格.comレビューをみてみるとSSD特有のプチフリーズとのこと。

http://kakaku.com/item/K0000007632/

早速設定を加えてみる。

1　Windowsのシステムの復元をオフにする。

マイコンピュータ→システムの復元→システムの復元を無効にするをチェック

2　自動更新を無効にする。

マイコンピュータ→自動更新→自動更新を無効にするをチェック

3　CドライブのSSDのディスク書き込みキャッシュをオフにする。

マイコンピュータ→cドライブのプロパティ→ハードウェア→SanDisk pSSD 16GBをプロパティ→ポリシー→ディスクの書き込みキャッシュを有効にする。をチェックオフ。

4　ディスクのインデックス書き込みキャッシュをオフにする。

マイコンピュータ→cドライブのプロパティ→全般→このディスクにインデックスを付け、ファイル検索を速くする。をチェックオフ。

HP mini 1000を購入

2009-06-10T15:41:00.006+09:00

仕事用PCが壊れたため、notebookを購入
HPのminiノートブックに。
決め手はキーボードの大きさとデザイン。SSDの起動の早さ。HDD容量は不要。
お店でHDDモデルと同時に再起動を試したところ、断然SSDの起動が早かった。

16G+8Gモデルが淀で39800円、ポイント10%でした。
http://h50146.www5.hp.com/products/portables/personal/mini1000/model_c2.html
http://kakaku.com/spec/K0000007632/

基本スペック
液晶サイズ 10.2 インチ
解像度 WSVGA (1024x600)
CPU Atom N2701.6GHz(512KB)

HDD容量 24 GB
メモリ容量 1GB
メモリ規格 DDR2 PC2-4200
メモリスロット（空き） 1(0)
PCカードスロット
　
詳細スペック
ビデオチップ Mobile Intel 945GSE Express
ビデオメモリ 128MB
LAN 100BASE
無線LAN IEEE802.11b (11Mbps)IEEE802.11g (54Mbps)
その他 Webカメラ
OS Windows XP Home
　
駆動時間 3.5 時間

サイズ
幅x高さx奥行
261.7x25.9x166.7 mm
重量
1.1 kg

HP mini 1000のディスク・メモリベンチマーク

2009-06-10T11:47:00.018+09:00

mini 1000の各ディスクをベンチマーク。

ツールは、CrystalDiskMark22を利用

http://crystalmark.info/download/

結果は以下のとおり。

SSD・内蔵USBはまあまあな値をだした。microSDは予想通りアクセス速度遅い。

Cドラ：内蔵SSD16G

Dドラ：内蔵USBメモリ8G

Fドラ：8G microSD スロット接続

おまけ　Eドラ　USBメモリPICODUAL

HP mini 1000にubuntu導入

2009-06-08T18:40:00.025+09:00

dualbootでlinuxを導入する。ubuntuのバージョンは、9.0.4が最新らしい。

導入先は、Dドライブの内蔵型USBメモリ8gにして、Cドライブのwindows領域と物理的にかえる。
win xpとubuntuで任意に起動選択できるようにしたい。

1　ubuntuのdualboot環境用インストーラ入手
ここから手に入れる。1.46MBくらい。

http://www.wubi-installer.org/

2　ubuntuのインストーラを入手
wubiから自動ダウンロードしてくれるが、ネットワーク回線の都合上、事前にインストーラをダウンロードしておいた。
今回は、ubuntu-9.04-desktop-i386を選択した。NotePC用インストーラも存在するが、昨年、別なPCに導入時に苦労したので、敢えてDESKTOP用を選択。もちろん32bit用。
715mくらい。
http://www.ubuntu.com/getubuntu/download

3　ダウンロードしたwubi.exeを実行
wubiとubuntu-9.04-desktop-i386を同じフォルダにおいてから、wubiを実行する。

4　インストール設定値を入力
dドラUSBメモリをターゲットに。ユーザ名とパスワードを指定。

5　インストール開始
virtual　disk作成が開始される。
非常に長い。ほか作業の合間にほっておいたが、3時間ちかくかかっていたと思われる。

6　完了後、再起動
*ここからは画面ログなし。

7　PCの電源がONにてboot選択
PC電源ON時に、winxpかubuntuを選択可能になっている。今後は毎回選択。15秒で選択がない場合は、自動でwinxpが起動するようになる。

8　bootにてubuntuを選択し、初回起動
初回起動時もファイル展開が走るため、非常に時間がかかる。このときは8時間くらいはほったらかしだった。

9　再度、再起動。
以降、ubuntu選択起動ではカーネル展開・起動で毎回40秒くらい。winxpより、若干早いかな？という程度。

■結果
今回、ubuntuのインストールは非常に簡単だった。時間が非常にかかったが、おそらく内蔵USBへのインストールのためと思われる。