モバイルデータ通信カードEMOBILE D12LC/SoftBank C01LCをユーティリティソフトなしで使用する

モバイルデータ通信カードEMOBILE D12LC/SoftBank C01LCをユーティリティソフトなしで使用する

0
【追記 7/1 22:50】
以下の記事内容はいったん取り下げます.動作再検証後に修正・再公開します.


別にユーティリティソフトを常駐させること自体には不満はないのだが,こいつが頻繁に画面表示に悪さをすることにイライラしていたので,ユーティリティを起動せずに接続する方法を調べてみた.
こちらのブログを参考に,筆者の環境で再現できた使用方法をまとめる.

1. 1度だけ必要な操作
1-i) 自動再生しないようにして(USB機器もShiftキーを押しながらでいいのかな?未確認.)データカードを接続.
1-ii) データカードの中身を適当な場所にコピー.

2. データカードを接続するたびに必要な操作
2-i) (1-ii)でコピーした ShowModem.exe を実行.
2-ii) ドライバのインストール後,ユーティリティが起動するので,そのまま終了する
※さらにこの手間を省略できるかどうか引き続き検討する.

3. ネットワークに接続する際に必要な操作
3-i) Windowsの「ネットワーク接続」画面を開き,ダイヤルアップ(データ通信)に接続.

これでさらに,手近な場所に(3-i)のショートカットを置いておけば,そのショートカットをダブルクリックするだけで接続することができるようになる.これでへんてこりんなアプリにリソースを食われることもなく,精神衛生上大変よろしい.

※注意※
なお,1度は正式にインストールし,ユーティリティソフトを起動しての接続・切断を行った環境であるため,まっさらの状態からこの方法で接続できるかどうかは確かめていません.

* * *

関係ないけど,USB接続式のデータ通信機器を「データカード」と呼ぶのには違和感が…
iPhone:CalDAV対応により、Exchange予定表とGoogleカレンダーの共存が可能に

iPhone:CalDAV対応により、Exchange予定表とGoogleカレンダーの共存が可能に

0
iPhone iOS 3.0 へのアップデートで地味に嬉しいのがCalDAV(カレンダー情報の共有・管理のためのプロトコル)に対応した点.

iPhoneの仕様では,登録できるExchangeサーバは1つに限られる.そのため,これまでも「Google Sync」などを利用してiPhoneのカレンダーとGoogleカレンダーを同期できする手段は提供されていたものの,会社のExchangeサーバで管理している予定表とGoogleカレンダーを併せて閲覧・管理することはできなかった.

しかし,今回のCalDAV対応によって,カレンダーを会社の予定表と同期(Exchange利用)しつつ同時にGoogleカレンダーとも同期(CalDAV利用)することが可能となった.もちろん,Googleカレンダーのメインカレンダーだけでなく複数の「マイカレンダー」を登録することもできる.

具体的な登録方法については下記リンク先を参照.


(ここで,同じく3.0から追加されたコピー&ペースト機能が必要不可欠となるあたりが絶妙だと思った.)

また,カレンダーの色が反映されるようになったり,(CalDAVを使って)祝日などのパブリックなカレンダーを併せて表示できるようになったりなど,ちょっとした改善が嬉しい.一方で,複数のグループカレンダーを一つ一つ登録しなければならない手間がかかる点などは今後の改善に期待したい.
iPhone:iOS 3.0 各種メール機能比較 (Draft)

iPhone:iOS 3.0 各種メール機能比較 (Draft)

0
待ちに待ったOS 3.0がようやくリリース! 朝起きてからアップデートしたもので,出社時刻がいつもよりだいぶ遅くなってしまった...(それでも,うちの部署はみなさん遅めなのでいつもと変わらずな朝だったけれど.)

さて,これにあわせて新たにMMSの送受信ができるようになったり,SMS受信時に着信音が鳴るようになったりとメール周りの環境も大きく変わったので,改めてiPhoneで利用できるメールアドレスとその機能についてまとめてみる.(ただし,あんまりちゃんと調べてないので間違ってたら教えて下さい><)


種別

アプリ

アドレス

送信先

設定

受信方法

画面通知

着信音/バイブ

絵文字

MMS

SMS/ MMS

@softbank.ne.jp / 電話番号

任意
※iPhone電話番号も可

不要 ※1

プッシュ通知

ポップアップ



SMS

SMS/ MMS

電話番号

SoftBank電話番号

不要

プッシュ通知

ポップアップ



Eメール(i)

メール

@i.softbank.jp

任意

メールアカウント追加

プッシュ通知
※本文はフェッチ対応

全画面



Yahoo! Mail

メール

@yahoo.com

任意


プッシュ対応

なし


×

Mobile Me
※2

メール

@me.com

任意


プッシュ対応

なし


×

Exchange
※3

メール

Exchangeサービスドメイン

任意


プッシュ対応

なし


×

Gmail

メール

@gmail.com / Google Appsドメイン

任意


フェッチ対応

なし



その他プロバイダ / Webメール

メール

任意

任意


フェッチ対応

なし


×

※1 MMS用@softbank.ne.jpアドレス確認・変更はPC版My SoftBnakにて.
※2 有料.カレンダー等の同期機能あり.
※3 主にエンタープライズサービス.カレンダー等の同期機能あり.
※ Exchange/MobileMeによるカレンダー等の同期は1サービスに限る.

リファレンス

替歌:バーニンソツロン

替歌:バーニンソツロン

0
出典:

バーニン(Burning)ソツロン(卒論)で
バーニン(Burning)ソツロン(卒論)で
バーニン(Burning)ソツロン(卒論)で
Burning Now

卒業したいなら
卒論書きましょう

誰よりももっともっと私を
認めて欲しいから結果出したい
でも出来ないの 有意差 Nothing
誤魔化しすぎる

効果みせようとすればするほど
p-値は上がりすべてがウラハラ
本当は仮説 棄却されるの
黙ってたけど

でも、(決定係数が)高いだけの解はちょっと
私が求めているモノとは違う

クロと言われても
シロだって言っちゃう
素直になれない
アマノジャク
隙を突かれたら
逆ギレしちゃって
苦しいのにナニ(言い訳を)言ってんだろう?

アマい(論文)審査に
卒業賭けるように…

* * *

ま,そういう自分は統計の「と」の字も出てこないような研究やってんですけどね.(ほんと,なんでこんな専攻のこんな分野にいるんだ俺...)

VBA: 円状にランダムに点を打つマクロ

0
Visio 上で,指定した座標を中心にランダムに点を打つマクロ.なおここでは,使用イメージのように点の密度が中央に偏るようにしている.



なお,Excel 関数の標準正規分布関数 NormSInv を使用するため,VBA から Excel オブジェクトライブラリを参照するために,あらかじめ以下の操作が必要.
(1) Visio にて,[ツール] → [マクロ] → 「Visial Basic Editor」を開く.
(2) Visual Basic Editor にて,[ツール] → [参照設定] → 「Microsoft Excel 9.0 Object Library」を選択 → [OK]
(*) その後,コードを編集し,保存.

使い方は,「実行するマクロ」内の値を適当に修正し,[ツール] → [マクロ] から「実行するマクロ」を実行.
※なぜ「drawPoints」を別のプロージャ(「実行するマクロ」)から呼び出しているかというと,引数を変えた複数の drawPoints を同時に実行できるようにするため.

[vb]
Sub 実行するマクロ()
drawPoints 100, 100, 1000, 50
End Sub

Sub drawPoints(x, y, n, r)
'x = 中心のX座標
'y = 中心のY座標
'n = 描画する点の個数
'r = 点の散らばる範囲を調整する値

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
'Microsoft Excel 9.0 Object Library を参照
Dim objExcel As Excel.Application
Set objExcel = CreateObject("Excel.Application")

'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
Dim myCircle() As Visio.Shape
'配列生成時に変数(ここでの n )を利用できないため ReDim を使用
ReDim myCircle(n)

i = 0
Do While i < n
drawX = x + objExcel.Application.NormSInv(Rnd) * r
drawY = y + objExcel.Application.NormSInv(Rnd) * r

'※描画する点の大きさは 2 に固定.手抜き...
drawX1 = drawX - 1
drawX2 = drawX + 1
drawY1 = drawY + 1
drawY2 = drawY - 1

'点を描画
Set myCircle(i) = ThisDocument.Application.ActiveWindow.Page.DrawOval(drawX1, drawY1, drawX2, drawY2)
'塗りつぶし色を変更
myCircle(i).CellsSRC(visSectionObject, visRowFill, visFillForegnd).FormulaU = "THEMEGUARD(RGB(0,32,96))"
'透過度を変更
'myCircle(i).CellsSRC(visSectionObject, visRowFill, visFillForegndTrans).FormulaU = "50%"
'線をなしにする
myCircle(i).CellsSRC(visSectionObject, visRowLine, visLinePattern).FormulaU = "0"
'レイヤを変更する
'myCircle(i).CellsSRC(visSectionObject, visRowLayerMem, visLayerMember).FormulaForceU = """5"""

'カウンタを進める
i = i + 1
Loop

'ReDim したオブジェクトは Erase するお約束(?)
Erase myCircle()
'''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
End Sub
[/vb]