http://pnpk.net

今までのこのページの書き方から、”削除してしまったアクティブディレクトリのユーザ・グループを復元する@AdRestore”なんて書こうとしたんだけども、タイトル長すぎるので簡潔にしてみました。

AdRestoreって何っすか？
AdRestoreを使うと、ドメインコントローラから削除したオブジェクトを再び有効に出来るようです。誤って削除してしまうような事が起きてもこのアプリケーションを知っていれば問題無い訳ですね、もちろんそれ以外にも復元する方法はあるんですけども。
(more…)

Popularity: 3%

読み逃げ禁止文化ってのがMIXIにはあるらしい。というのはスラッシュドットとITメディアの記事から。

友人のmixi日記を読み、コメントを残さずに立ち去る「読み逃げ」を失礼と感じるユーザーが増えており、読み逃げを公然と非難する人も出てきた。だが古参のネットユーザーを中心に「何が悪いか分からない」という人も多く、“読み逃げ禁止文化”に対する困惑が広がっている。

こういった人は足跡が残っているのにコメントがついていないとがっかりするんだとか・・・興味深いですね。
(more…)

Popularity: 2%

Sysinternalsって何すか？
Sysinternalsっていうサイトがあって、このサイトのサイドバーに今日現在RSSも貼ってあるんだけどここにWindowsOSを使っていく上で便利この上ないアプリケーションが無償で公開されているわけですよ。
痒い所に手が届くっていうか、見た感じ半ば裏ワザみたいなアプリケーションばっかりで、見てるだけで結構楽しかったりします。

Sysinternalsってサイトは英語サイトで、読むのに結構苦労するんだけども@ITにここで公開されているアプリケーションについての説明が掲載されていたのでとりあえずこいつを転載して、どれだけ面白そうなアプリケーションがあるのかを見てみてください。
アプリケーション名をクリックすると別ウィンドウでTechNetの解説とダウンロードのページが開きます。また、このサイト内でも各アプリケーションについての詳細をやっていますので、知りたいアプリケーションあればサイト内検索を使ってください。
・・・無かったらごめんなさいね。
(more…)

Popularity: 5%

いやいや、書き込みが数日開いてしまいました。
久しぶりに奈良県の祖母の村へ行ってました、特筆するべき箇所が全く無かったのでまあそれくらいなんですけども。

今日はIntel CPU価格改定について書きたいと思います。
(more…)

Popularity: 5%

自動的にディレクトリを作成して、そこにバックアップを取っておきたいときってあるじゃないですか。
このスクリプトを使ってもらえれば自動的にディレクトリの作成を行ってくれます。
あとは適当にディレクトリの中に入れたい物でも追加してください。自動実行させる場合にはタスクスケジューラに入れて実行してくださいね。

'#################################################
'ファイル名:CRDir.vbs
'Pathで指定したディレクトリに今日の日付の
'ディレクトリを作成します。
'既にディレクトリが作成されていた場合には
'ディレクトリを作成しません。
'#################################################
Option explicit

Dim strDate
Dim objFS
Dim dtYMD
Dim WSHShell
Dim EXPath
Dim Path

'対象ディレクトリを入力
Path = "C:\"

Set objFS = WScript.CreateObject("Scripting.FileSystemObject")
dtYMD = Now

If Len(Datepart("m",dtYMD)) = 1 then
strDate = "0" & Datepart("m",dtYMD)
Else
strDate = Datepart("m",dtYMD)
End if

If Len(Datepart("d",dtYMD)) = 1 then
strDate = strDate & "0" & Datepart("d",dtYMD)
Else
strDate = strDate & Datepart("d",dtYMD)
End if

EXPath = Path & Datepart("YYYY",dtYMD) & strDate

If objFS.FolderExists(EXPath) Then

Else
objFS.CreateFolder(EXPath)

End If

Set objFS = Nothing

追加Function版

Function strDate(dtYMD)
'#################################################
'#日付(Now)を元にディレクトリを作成します。
'#(例)
'#2007/10/01 01：15：00 →20071001
'#################################################
    Dim objFS
    Dim WSHShell

    If Len(Datepart("m",dtYMD)) = 1 then
        strDate = "0" & Datepart("m",dtYMD)
    Else
        strDate = Datepart("m",dtYMD)
    End if

    If Len(Datepart("d",dtYMD)) = 1 then
        strDate = strDate & "0" & Datepart("d",dtYMD)
    Else
        strDate = strDate & Datepart("d",dtYMD)
    End if

    strDate = Datepart("YYYY",dtYMD) & strDate
End Function

Popularity: 3%

PDF（Portable Document Format）って使ったことあります？Adobeの提唱したOSに依存しない文書規格のファイルです。最近は安価にPDFが作れる！だとか編集できる！だとかいろいろな製品出てるじゃないですか。でもあれってほとんどは無償で使えたりするんですよ。
覚えておくといつか役に立つかもしれないから頭の片隅に置いておいてください。ってことで、今回はPDFを作成する時に便利なアプリケーション・ハードウェアについて書きます。全て僕が日常使わせてもらっているアプリケーションやハードウェアなんで使ってもらいたいお勧めなものだけ書いてみました。

ConcatPDF
主にPDFの結合に使っています。
例えばWordで作成したドキュメントに仕様書を後から貼り付けて見積書も貼り付けて・・・なんて時にすごく便利です。ドラッグ＆ドロップでPDFファイルをConcatPDFに入れてボタンを押すだけで簡単に複数のPDFファイルを結合してくれます。Office2007からアドインを組み込む事でドキュメントをPDF形式で保存出来るようになったんだけど、これにもちゃんと対応しています。

ホームページ

ScanSnap

ボタン一つでPDFファイルを作成してくれます。最近新製品が出たみたい。僕はこれの一個前のタイプを持ってるんだけど、領収書とか説明書とか何でもかんでもPDFにしまくって紙はバシバシ捨ててしまっています。
PDFの文字自動認識機能も付いていて、スキャンした画像データから文字を抜きだしてくれて検索可能なPDFにしてくれます。

このPDF画像からの文字解析って精度が結構甘いんだけど、そもそも検索用だからあまり精度は無くても検索で引っ掛かればOKらしいです。
あと、このスキャナの良いところはまとめて紙をスキャン出来ちゃう所です。普通の資料ならだいたい丸ごと一度にスキャン出来ますよ。
本当に僕はこれのおかげで紙媒体が周りにほとんどありません。お勧めです。
ただし、電子化したデータのバックアップはしっかり行いましょう。

Microsoft Office 2007 Standard

正直Office2000からOffice2003にアップグレードした時は微妙だと思ったんだけど、Office2007はかなり使いやすいです。無償のアドインを組み込む事でPDF形式でドキュメントを保存する事も出来ます。
Office2003からの変更点で一番便利になったのはメニューだと思っています。
今までは文字だけのメニューだったんだけど、新しくなって直観的なアイコン表示になったんです。これによって初心者でも分かりやすく、本当に素早く作業が出来ちゃいます。
正直なところWindows Vistaはまだ自分でも使うのをためらうくらいなんだけど、Office2007は既にフルに使っています。一度Office2007を使うとおそらくOffice2003に戻りたくなくなります。それくらい便利です。

Popularity: 4%