REMOTE_ADDR を 使った ソースコードを紹介する表示色の説明：ASP VBScriptは <% 〜 %>
キーワードはREMOTE_ADDR です。
<%@LANGUAGE=VBScript%>
<html>
<head>
<META HTTP-EQUIV="Content-Type" CONTENT="text/html; charset=x-sjis">
<title>テキストファイルにＩＰアドレスを書き込む</title>
</head>
<body>
<h2>テキストファイルにＩＰアドレスを書き込む</h2>
test007-3.asp<br>
<hr>
<%
'*1 FileSystemObjectを生成します、、って英文、そのままジャン。
Set objFS = Server.CreateObject("Scripting.FileSystemObject")
'*2 test007.txt を追加モードで開く
Set ts = objFS.OpenTextFile(Server.MapPath("test007.txt"), 8, True)
'*3ファイルにデータを書き込む
ts.write "test007-3.asp アクセス時刻は、" & Now & " , " '時刻を書く
ts.write Request.ServerVariables("REMOTE_ADDR") & " , " 'IPアドレス
ts.write Request.ServerVariables("HTTP_USER_AGENT") 'ブラウザ情報
ts.write chr(13) & chr(10)
'*4使ったファイルは閉じようよ
ts.close
%>
<hr>
書き込み終了です。<br>
<A HREF="test007.txt">結果のtest007.txtを見る</A><br>
<br>
<HR>
解説ページ→
<A HREF="http://www.ken3.org/backno/backno_asp02.html#7">
<b>[No.7 ブラウザ（端末情報）をＧｅｔする</b></A><br>
<Font Size=-1>
<br>
<a Href="http://www.ken3.org/asp/" TARGET="_top">[ＡＳＰ系メニューへ]</a>
<a href="http://www.ken3.org/cgi-bin/bbs/asp/wforum.cgi" target="F_RIGHT">[質問・感想掲示板]</A>
<a href="http://www.ken3.org/backno/backno_asp_mokuji.html" target="F_RIGHT">[バックナンバー目次]</a><br>
<br>
</Font>
<hr>
</body>
</html>
| 最近発売の雑誌を紹介する
パソコン雑誌です。息抜きや空いた時間に読んで見ては？
- DTP WORLD (ディーティーピー ワールド) 2008年 06月号
- Windows 100% 2008年 06月号
- 日経 PC (ピーシー) ビギナーズ 2008年 06月号
- PC Japan (ジャパン) 2008年 06月号
- Software Design (ソフトウエア デザイン) 2008年 06月号
- Web Designing (ウェブデザイニング) 2008年 06月号
- I/O (アイオー) 2008年 06月号
- 月刊 COMPUTERWORLD (コンピュータワールド) 2008年 07月号
|