カウンタ
プロフィール

sc440ge

Author:sc440ge
「あめた」です。大ケガをして拾われたニャン。サーバーの空き箱に入ってるニャン。
「あめた」ありがとう。
20130603

sc440ge@yahoo.co.jp
パソコン価格情報

 [2009/06/28] *

パソコンを無線ルーター化してみる / WLI-UC-G (BUFFALO)




■■■■■■■■■■ Entry Start ■■■■■■■■■■


・ブログトップへ戻る



[PC古箱]
<--- パソコン・ソフトの記事へ




[無線親機を作る ・ソフトウェアルータ(親機) / WLI-UC-G (BUFFALO)]

090628_000A.jpg


WLI-UC-G (BUFFALO)は、インタ-ネットにつながっているパソコンのUSBポ-トに接続すると、パソコンが無線LANの親機として使えます。 無線ルーターをお持ちの方は不要かもしれませんが、WLI-UC-G は面白い使い方ができそうなので、購入してみました。(TWO TOPで780円でした。二個購入。)




[パソコンを無線ルーター化してみる]
090628_009.png

親機として使うにはインストール時にインターネットに接続している必要がありますので、ご注意ください。 (ドライバーインストール時のみ)

また、子機側のパソコンにはBUFFALOの無線アダプタを取り付け、クライアントマネージャ3をインストールしています。


[スタート]
090628_001.png



[親機モードでインストール]
090628_002.png



[インストール開始]
090628_003.png



[インターネットに接続してから再試行]
090628_004.png



[WLI-UC-Gを親機のパソコンにつける]
090628_005.png



[WLI-UC-Gを親機のパソコンにつける]
090628_005b.jpg



[親機のドライバーのインストールが完了する]
090628_006.png



[親機にアイコンが追加される]
090628_007.png



[親機のAOSSをクリック]
090628_008.png



[子機の操作]
090628_009.png



[子機のAOSSをクリック]
090628_009b.png



[子機の表示]
090628_009c.png



[親機でAOSSが完了する]
090628_010.png



[親機に接続されている台数が1になる]
090628_011.png



これで親機経由でインターネットに接続できるようになります。

親機を無線プリンターサーバー化したり、ファイルサーバーにしたりと、いろいろな使い方ができると思います。 なかなか面白い無線アダプターです。 









関連記事



・ブログトップへ戻る



ちょっと待ってニャン。まだ何か買うニャンか? パソはやめれないニャンか?いたずらしないからゲージから出してニャン。拍手はちょっとだけ好きニャン。
ame-thinks.jpg




パーツ・周辺機器 | 【2009-06-28(Sun) 11:54:29】 | Trackback(-) | Comments(-)
編集  

 
Ads by Google 1
最新記事

[Key]
vbCrLf Chr(10) Chr(13) Application.WorksheetFunction.Max End(xlUp) ActiveCell.Row - 1 Cells(11,"B").Select Worksheet_SelectionChange UserForm Application.Wait Now() Application.Speech.Speak CreateObject("SAPI.SpVoice") voice.getdescription() Do While  TimeValue< Len vbNarrow Replace trim Until  Exit Do Like Right UBound Split vbLf ActiveSheet.Hyperlinks.Add Anchor Range GetVoices.Count voice.getdescription Item ColumnCount ColumnWidths  ColumnCount ColumnWidths Cells(10, "IV").End(xlToLeft).Column .PageSetup.PrintArea Label ComboBox CheckBox OptionButton ListBox vlookup NumberFormatLocal  Application.GoTo Reference:=Range("$B$4"), Scroll:=True ActiveSheet.ScrollArea = "A1:D65536"  Cells(1, "A").NumberFormatLocal = "yy/mm/dd" Selection.Delete Shift:=xlUp IsError Application.VLookup DoEvents Loop CriteriaRange AdvancedFilter Action:=xlFilterInPlace .SaveAs , xlCSVActiveSheet.Hyperlinks.Add Anchor:=Selection, Address< Dir(ThisWorkbook.Path & "\*") Set myRng = myData.Find(myWord, LookAt:=xlPart) Application.WorksheetFunction.Match InStr Left Mid Trim Replace StrConv vbNarrow ComboBox1.AddItem ListBox1.AddItem Like 'ActiveCell.Interior.ColorIndex = 37 Rows(ActiveCell.Row).Interior.ColorIndex = xlNone Selection.ClearContents Selection.Clear Range(Cells(myRow1, "A"), Cells(myRow2, "C")).ClearContents ActiveSheet.PageSetup.PrintArea = "$A$2:$C$10"