?? ipinfo.aspx
字號:
<% @ Page language="VB" Debug="true" %>
<% @ Import Namespace="System.Data" %>
<% @ Import Namespace="System.Data.OleDb" %>
<Script Runat="Server">
Public Sub Page_Load(obj As object,e As eventargs)
Dim myconn As OleDbConnection
If Not IsPostBack Then
If request.querystring("ip")<>"" And ConfigurationSettings.AppSettings("ipinfo")="開啟" Or session("isadmin")<>"" Then
myconn= New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source="&server.MapPath(ConfigurationSettings.AppSettings("IP數據庫路徑")))
myconn.open()
Dim ip As string = request.querystring("ip")
Dim sip As string() = Split(ip,".")
Dim num =clng(sip(0))*256*256*256 + cint(sip(1))*256*256 + cint(sip(2))*256 + cint(sip(3))-1
Dim mycomm As New oledbcommand("select * from ipadress where ip1<="& num &" and ip2>="&num,myconn)
Dim dr As oledbdatareader = mycomm.Executereader()
If dr.read() Then
Dim country As String = dr("國家")
Dim city As String = dr("城市")
if country="" then country="中國"
if city="" then city="未知"
ipadress.text="來自地區:"& country &" 來自城市:"&city
dr.close()
myconn.close()
Else
ipadress.text="來自國家:未知 來自城市:未知"
dr.close()
myconn.close()
End If
ipview.text= "IP地址:"&request.querystring("ip")
Else
ipview.text="錯誤:查看IP地區信息的功能已被管理員關閉!"
End If
End If
End Sub
</script>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>目標IP的地區信息</title>
<style>
TEXTAREA {
BORDER-RIGHT: <%=ConfigurationSettings.AppSettings("字體顏色")%> 1px solid; BORDER-TOP: <%=ConfigurationSettings.AppSettings("字體顏色")%> 1px solid; BORDER-LEFT: <%=ConfigurationSettings.AppSettings("字體顏色")%> 1px solid; COLOR: <%=ConfigurationSettings.AppSettings("字體顏色")%>; BORDER-BOTTOM: <%=ConfigurationSettings.AppSettings("字體顏色")%> 1px solid; BACKGROUND-COLOR: <%=ConfigurationSettings.AppSettings("留言框背景色")%>;font-family:"宋體";
}
.gueststyleline{ color:<%=ConfigurationSettings.AppSettings("字體顏色")%>; background-color: <%=ConfigurationSettings.AppSettings("表格邊框色")%> ;font-family: "宋體"}
.gueststylebg{color:<%=ConfigurationSettings.AppSettings("字體顏色")%>; background-color: <%=ConfigurationSettings.AppSettings("留言框背景色")%> ;font-family: "宋體"}
.gueststylerebg{ color:<%=ConfigurationSettings.AppSettings("字體顏色")%>; background-color: <%=ConfigurationSettings.AppSettings("回復框背景色")%> ;font-family: "宋體"}
.gueststylehr{color:<%=ConfigurationSettings.AppSettings("表格邊框色")%>}
INPUT.TEXT
{
BORDER-RIGHT: <%=ConfigurationSettings.AppSettings("字體顏色")%> 1px solid;
BORDER-TOP: <%=ConfigurationSettings.AppSettings("字體顏色")%> 1px solid;
BORDER-LEFT: <%=ConfigurationSettings.AppSettings("字體顏色")%> 1px solid;
BORDER-BOTTOM: <%=ConfigurationSettings.AppSettings("字體顏色")%> 1px solid;
BACKGROUND-COLOR: <%=ConfigurationSettings.AppSettings("留言框背景色")%>;
; font-style:normal
; color: <%=ConfigurationSettings.AppSettings("字體顏色")%>
; font-family: "宋體"
}
BODY{
FONT-FAMILY: "宋體"; FONT-SIZE: 9pt;
SCROLLBAR-3DLIGHT-COLOR:<%=ConfigurationSettings.AppSettings("表格邊框色")%>;
SCROLLBAR-SHADOW-COLOR:<%=ConfigurationSettings.AppSettings("表格邊框色")%>;
SCROLLBAR-DARKSHADOW-COLOR:<%=ConfigurationSettings.AppSettings("留言簿背景色")%>;
SCROLLBAR-FACE-COLOR:<%=ConfigurationSettings.AppSettings("留言框背景色")%>;
SCROLLBAR-ARROW-COLOR:<%=ConfigurationSettings.AppSettings("表格邊框色")%>;
SCROLLBAR-TRACK-COLOR:<%=ConfigurationSettings.AppSettings("留言簿背景色")%>
; background-color:<%=ConfigurationSettings.AppSettings("留言簿背景色")%>}
A:visited {
TEXT-DECORATION: none
}
A:active {
TEXT-DECORATION: none
}
A:hover {
TEXT-DECORATION: underline overline
}
A:link {
color: <%=ConfigurationSettings.AppSettings("超鏈接顏色")%>; text-decoration: none; font-size: 9pt
}
A:visited {
color: <%=ConfigurationSettings.AppSettings("超鏈接顏色")%>; TEXT-DECORATION: none
}
A:active {
TEXT-DECORATION: none
}
A:hover {
TEXT-DECORATION: underline overline
}
.FILTER {
FILTER: glow(color=<%=ConfigurationSettings.AppSettings("字體顏色")%>,direction=135)
}
.replytext {
color:<%=ConfigurationSettings.AppSettings("回復字體顏色")%>;font-family: "宋體"
}
TD,DIV,form ,OPTION,P,TD,BR{FONT-FAMILY: 宋體; FONT-SIZE: 9pt}
INPUT {
BORDER-TOP-WIDTH: 1px; PADDING-RIGHT: 1px; PADDING-LEFT: 1px; BORDER-LEFT-WIDTH: 1px; FONT-SIZE: 9pt; BORDER-LEFT-COLOR: #cccccc; BORDER-BOTTOM-WIDTH: 1px; BORDER-BOTTOM-COLOR: #cccccc; PADDING-BOTTOM: 1px; BORDER-TOP-COLOR: #cccccc; PADDING-TOP: 1px; HEIGHT: 18px; BORDER-RIGHT-WIDTH: 1px; BORDER-RIGHT-COLOR: #cccccc
}
form {margin:0; padding:0}
</style>
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_reloadPage(init) { //reloads the window if Nav4 resized
if (init==true) with (navigator) {if ((appName=="Netscape")&&(parseInt(appVersion)==4)) {
document.MM_pgW=innerWidth; document.MM_pgH=innerHeight; onresize=MM_reloadPage; }}
else if (innerWidth!=document.MM_pgW || innerHeight!=document.MM_pgH) location.reload();
}
MM_reloadPage(true);
//-->
</script>
</head>
<body>
<table class="gueststyleline" border="0" cellpadding="1" cellspacing="0" width="370" height="257" align="center">
<tr>
<td valign="top" >
<table width="100%" border="0" cellpadding="0" cellspacing="0" height="100%">
<tr>
<td valign="top">
<table width="100%" border="0" cellpadding="0" cellspacing="0" class="gueststyleline" height="18">
<tr>
<td width="94%" height="18" align="left"><p><img src="Images/icon/ipinfo.gif" width="16" height="16">目標IP的地區信息</p>
</td>
<td width="6%" align="left">
<div align="center"><a href="javascript:self.close()"><img src="Images/icon/close_a.gif" alt=" 關 閉 窗 口 " width="11" height="11" border="0"></a></div></td>
</tr>
</table>
<table width="100%" cellpadding="1" cellspacing="0" class="gueststylebg" height="100%">
<tr>
<td height="235">
<div align="center"><font color="#FF0000" size="3">
<asp:label ID="ipview" runat="server" /><br><br>
<asp:label ID="ipadress" runat="server" />
</font></div></td>
</tr>
</table>
</table>
</td>
</tr>
</table>
</body>
</html>?? 快捷鍵說明
復制代碼
Ctrl + C
搜索代碼
Ctrl + F
全屏模式
F11
切換主題
Ctrl + Shift + D
顯示快捷鍵
?
增大字號
Ctrl + =
減小字號
Ctrl + -