PHPおよび.NET版のクライアント情報を自動生成

全角で使用しています。半角に修正してください
私のオリジナル作品ではありません
それらのほとんどは、いくつかの学習チュートリアルで簡単に紹介されています

効果

.NET バージョン

<%@Page Language="C#" Debug="true"%> %@Import namespace="System"% >
<%@Import namespace="System.Drawing"%>
<%@Import namespace="System.IO"%> <%
string sReferer= Request.ServerVariables["HTTP_REFERER"];
string sLanguage,sBrowser,sSys;
if(Request.ServerVariables["HTTP_ACCEPT_LANGUAGE"].IndexOf("zh-cn") >=0){
sLanguage="中国語";
}
else
{
sLanguage=Request.ServerVariables["HTTP_ACCEPT_LANGUAGE"];
string[ ] aUserAgent=Request.ServerVariables["HTTP_USER_AGENT "].Split(';');
if(aUserAgent.Length>2){
sBrowser=aUserAgent[1].Replace("MSIE","Internet Explorer) ").Trim();
if(sBrowser=="U"){
sBrowser="Mozilla";
}
sSys=aUserAgent[2].Replace(")"," ");
sSys=sSys .Replace("NT 5.2","2003");
sSys=sSys.Replace("NT 5.1","XP");
sSys=sSys.Replace( "NT 5.0","2000") ;
sSys=sSys.Replace("9x","Me").Trim();
}
else
{
sBrowser="不明";
sSys=" 不明";
}
int nWidth=260,nHeight=90;
ビットマップ image=new Bitmap(nWidth,nHeight);
グラフィックス g=グラフィックス。 FromImage(画像);
Stream imgData=new MemoryStream();
g.Clear(Color.Snow); );
g.DrawString( "あなたの IP : " + Request.ServerVariables["REMOTE_ADDR"],new Font("Courier New", 9,FontStyle.Bold),new SolidBrush(Color.FromArgb(200, 14, 91)),6,6);
g.DrawString("Language : " + sLanguage,new Font("Courier New", 9,FontStyle.Bold),new SolidBrush(Color.FromArgb(0, 0, 0) )),6,26);
g.DrawString("お使いの OS : " + sSys,new Font("Courier New", 9,FontStyle.Bold),new SolidBrush(Color.FromArgb(0,0,255)) ,6,46);
g.DrawString("Browser : " + sBrowser,new Font("Courier New", 9,FontStyle.Bold),new SolidBrush(Color.FromArgb(0, 160, 0)), 6,66);
g .Dispose();
Response.ContentType="image/gif"
image.Save(Response.OutputStream ,System.Drawing.Imaging.ImageFormat.Gif); 🎜>%>


PHP バージョン

//プロセス表示される関連情報

if (!(strpos($_SERVER["HTTP_ACCEPT_LANGUAGE"],"zh-cn")===false)){

$sLanguage="中国語"

}

else
{
$sLanguage=$_SERVER["HTTP_ACCEPT_LANGUAGE"]
}
$aUserAgent=explode(";",$_SERVER["HTTP_USER_AGENT"]); (count($aUserAgent)>2 ){
$sBrowser=trim(str_replace("MSIE","Internet Explorer",$aUserAgent[1]));
if(trim($sBrowser)== "U"){
$ sBrowser="Mozilla";
}
$sSys=str_replace(")","",$aUserAgent[2]); NT 5.2","2003",$ sSys);
$sSys=str_replace("NT 5.1","XP",$sSys);
$sSys=str_replace("NT 5.0","2000", $sSys);
$sSys =trim(str_replace("9x","Me",$sSys));
}
{
$sBrowser="不明"; 🎜>$sSys="Unknown";
}
header ("Content-type: image/png")
//画像の幅と高さを定義します
$nWidth=250> $nHeight=90;
$im = @imagecreate ($nWidth,$nHeight) or die ("新しい GD 画像ストリームを初期化できません")
//画像のカラー設定
$background_color = imagecolorallocate ($im, 235, 235, 240);
$sColorRed = imagecolorallocate ($im, 200, 14, 91);
$sColorBlack = imagecolorallocate ($im, 0, 0, 0); $sColorBlue = imagecolorallocate ($im, 0, 0, 255);
$sColorGreen = imagecolorallocate ($im, 0, 160, 0)
//画像の境界線を描画します
imagefilledrectangle($im, 0, 0, $nWidth - 1, $nHeight - 1 , $background_color);
imagerectangle($im, 0, 0, $nWidth - 1, $nHeight - 1, $sColorBlack);画像テキスト
画像文字列 ($im, 3, 6 , 6, "あなたの IP : " . $_SERVER["REMOTE_ADDR"], $sColorRed); : " . $sLanguage, $sColorBlack);
imagestring ($im, 3, 6, 46, "お使いの OS : " . $sSys, $sColorBlue);
imagestring ($im, 3, 6, 66 , "ブラウザ: " . $sBrowser, $sColorGreen);
imagepng ($im);

;