また、行けません。よっ。

LotusDay 2008が、７月半ばに開催されるようです。
が、自分行けないよぉ。

経費削減もあるんですが、
その前の日の14～15日とネットワーク関連教育受講で出張なもんで
16日にコレいくと３日連荘で、
いくらなんでも上長許可してくれないだろうと。
ダメもとで言ってみたものの、やっぱし玉砕くらったし。

はぁー、毎年開催のタイミング悪いよ、コレ。


それにしても、セミナー関連の情報をRSSフィード出力してほしいなー。
IBM様。。。

ＤＢ間文書のコピー用LotusScript

前に他の部署の人に聞かれて作ったサンプルのスクリプト。
メールＤＢの中のドラフト保存でとっといてたけど、
いい加減ドラフト文書が邪魔ｚｚｚなのでこっちに移動。


現在のＤＢから別ＤＢへとコピーする場合のスクリプト。
現在のＤＢからコピーする文書をビュー上で選択し、
別ＤＢへとコピーします。

*注意点*
コピーする文書のフォームは、
別DB内に現在のDBで使用している同じフォーム名のフォームを用意すること。
フォーム内の設計をまったく同じにする必要はないが
表示したいフィールドは同じ名前のものを使用すること。

エージェントで作成し、↓のように設定すること。

（ここでの画像はR7のものですが、R5等でも別のところで同じように設定できます。）

Dim session As New NotesSession
Dim db As NotesDatabase
'現在のＤＢ
Set db = session.CurrentDatabase
'別ＤＢの指定
Dim Tdb As NotesDatabase
Dim ServerName as string, DbPath as string
ServerName　=　"サーバを指定"
DbPath　=　"パスを指定"
Set Tdb = New NotesDatabase( ServerName, DbPath )
Dim collection As NotesDocumentCollection
Dim doc As NotesDocument
Set collection = db.UnprocessedDocuments
Set doc = collection.GetFirstDocument()
While Not(doc Is Nothing)
　　Call doc.CopyToDatabase( Tdb )'ここでコピー
　　Set doc = collection.GetNextDocument(doc)
Wend

@IFと@Trueと@Return

あまりにお久しぶりです。

以下は、ノーツ関数が不得意な自分のための防備録。
（だってスクリプトのほうが動作確認楽なんだもんｚｚｚ）

ボタンアクションで以下のような@関数式が表記されている場合、
１行目で、編集モードになってない場合に
２行目から続く処理を行わないようにする。
編集モードの場合は、そのまま処理を続ける。

@If(@IsDocBeingEdited;@True;@Return(""));
DBFile := "49256997:000BFDAA";
temp := @PickList([Custom]:[Single];DBFile;"TraderSelectView";"業者選択";"業者を選択してください";6);
FIELD GyousyaName := @Word(temp;",";1);
FIELD GyousyaLucas := @Word(temp;",";3);
FIELD GyousyaMail := @Word(temp;",";4);
@Command([ViewRefreshFields])

WEB上の危険を回避するために。

以前、自宅のＰＣがウィルスに感染して駆除できないーと
泣きついてきた課長さんがおりました。
ウィルスの種類を聞いたら、
よく、○○ル○なサイトにウヨってる木馬じゃないですか。。。
「どこ見にいってんのｗｗｗ」と笑ってあげた記憶があります（ﾏﾃ

が、この手のマルウェアの厄介なところは
ウィルス対策ソフトで駆除できない場合があることです。
相手がある程度ＰＣの知識がある人なら、
「最悪、HDDフォーマットしてOS再インストしたほうがいいよ。」
って言って終わりなんですが
PCに使われてるぐらいの人だったりすると説明するほうが時間が掛かる。
というか説明しても相手の思考回路がロックします。（ぁ

このため、感染しないようにする方法が必要になるわけですが
100%感染しないようにする方法はありません！
各自の責任および注意が必要になります。
（危ないサイトはマルウェア感染だけとは限りません。
不正請求サイトもありますヨ。）

まず「危ないサイトは近づかない。」
これに尽きるわけですが、
危ないサイトって何なの？って言われると話は別。
すべての○ダ○○サイトが危ないわけではありませんし、
大手のサイトでも穴開けられてページの書き換えをされてしまえば
立派に危ないサイトになってしまいます。
ただまぁ、スパムメールのリンクや広告リンクなどの
誘導型サイト（個人の好みや金儲けなどの甘い罠）なんかは
危険性の確率が高くなります。

で、上に挙げたとおり、どこでも危険性があるなら、
慎重な人間ならどのサイトのページも見にいけなくなります。
ということで↓。
危ないサイトをユーザーの代わりに見てきてくれる「aguse Gateway」（by @IT）

見たいサイトを「aguse」でチェックして安全性を確認しましょう。
ただし、これでチェックしたとしても、
上に言ったとおり100%問題ないとは言い切れません。
が、ある程度の目安にはなるはずです。

「ＰＣの知識がない。」は
現在のインターネットの状況からして言い訳になりません。
ＰＣ上にあるあなたの個人情報、データ等の財産は
あなた自身で守るしかありませんヨ。

ツメが折れた！

って、朝から同僚に言われて、へ？と思ったら
LANケーブルの口のRJ45コネクタんところのツメでしたzzz

ってことで、RJ45コネクタ付け替えを頼まれたわけですが、
作業があまりに久しぶりだったもんで、なかなかしんどい。
何がって、PINのアサイン方法をド忘れしてるし。。。
なので、ちとここで忘備録。

ストレート配線は、向かって
１番PIN：白と橙のマーブル
２番PIN：橙
３番PIN：白と緑のマーブル
４番PIN：青
５番PIN：白と青のマーブル
６番PIN：緑
７番PIN：白と茶のマーブル
８番PIN：茶
な感じで差し込む事。
（10Mも100Mも同じ配線。1GのCAT6は分からんが一緒かも。）
※クロスは作ること滅多にないので割愛（おぃおぃ。

あとは、長さを揃えて切っても
RJ45のコネクタに差し込む時には長さがバラバラに。
なもんで、奥まで刺さらないPINが･ﾟ･(ﾉД`)･ﾟ･｡
何度か切りそろえてたらケーブル短くなってくるし･ﾟ･(ﾉД`)･ﾟ･｡

ムリヤリ差し込んで、もぅいいやー。的に圧着し、
導通テスターを持ってないので速度でてるかわかんないけど
適当にＰＣにつなげてネット接続できたことを確認して、もぅ終了～

すごく適当だけど、つながればいいのヨ！
だって自分ところのLANケーブルじゃないも～ん