Detect client display resolution, browser type, and client IP

xiaoxiao2021-03-06  19

The following code implements the ability to detect the resolution of the client display, the browser type, and client IP. You can save client information into session, viewstate, etc. to use them directly on other pages.

Clientpeek.aspx

! <% @ Page language = "vb" EnableViewState = "false" Codebehind = "ClientPeek.aspx.vb" AutoEventWireup = "false" Inherits = "aspxWeb.ClientPeek"%> Detect client display resolution, browser type, client IP </ title> <meta http-equiv =" content-type "content =" text / html; charSet = GB2312> <meta content = "Microsoft Visual Studio 7.0" Name = "generator"> <meta content = "c #" name = "code_language"> <meta content = "[Menciic E-chapter]: http: //xml.sz.luohuedu.net/ "Name =" copyright "> <meta content =" javascript "name =" vs_defaultclientscript "> <meta content =" http://schemas.microsoft.com/intellisense/ie5 "Name = "vs_targetschema"> </ head> <body id = "mybody" ms_positioning = "gridLayout" runat = "server"> <form id = "browserpeek" runat = "server"> <ask: label id = "label1" Runat = "Server"> </ asp: label> </ form> </ body> </ html></p> <p>Clientpeek.aspx.vb</p> <p>Imports system</p> <p>Public Class ClientPeek Inherits System.Web.UI.Page Protected WithEvents Label1 As System.Web.UI.WebControls.Label Protected WithEvents MyBody As System.Web.UI.HtmlControls.HtmlGenericControl</p> <p>#Region "The code" of the web form designer "</p> <p>'This call is required for the web form designer. <System.diagnostics.debuggerstepthrough ()> private subinitializecomponent () End Sub</p> <p>'Note: The following placeholders declare are required by the web form designer. 'Don't delete or move it. Private DesignerPlaceHolderDeclaration as System.Object</p> <p>Private sub page_init (Byval e as system.Event, byval e as system.eventargs _ handles mybase.init 'Codegen: This method call is required by the Web Form Designer' Do not modify it using the code editor. InitializationComponent () End Sub</p> <p>#End region</p> <p>Private Sub Page_Load (ByVal sender As System.Object, ByVal e As System.EventArgs) _ Handles MyBase.Load Dim Button1 As New System.Web.UI.WebControls.Button If Not Me.IsPostBack Then Dim btnW As New System.Web. UI.HtmlControls.HtmlInputHidden Dim btnH As New System.Web.UI.HtmlControls.HtmlInputHidden Button1.ID = "Button1" btnW.Name = "WidthPixel" btnW.ID = "WidthPixel" btnH.Name = "HeightPixel" btnH.ID = "HeightPixel" Me.FindControl ( "browserpeek"). Controls.Add (btnW) Me.FindControl ( "browserpeek"). Controls.Add (btnH) Me.FindControl ( "browserpeek"). Controls.Add (Button1) Dim scriptString As String = "" scriptString = "document.browserpeek.WidthPixel.value = window.screen.width;" scriptString = "document.browserpeek.HeightPixel.value = window.screen.height;" Me.RegisterOnSubmitStatement ( "Meng" , scriptstring) me.mybody.attributes.add ("OnLoad", "Document.browserpeek.Button1.click ();") else me.mybody.attribu tes.Remove ( "onload") If Me.FindControl ( "browserpeek"). Controls.Contains (Button1) Then Me.FindControl ( "browserpeek"). Controls.Remove (Button1) Button1.Dispose () End If Dim strLabel As New System.Text.StringBuilder Dim bc as HttpBrowserCapabilities = Request.Browser strLabel.Append ( "your browser's resolution:") strLabel.Append (Request.Form ( "WidthPixel")) strLabel.Append ( "×" Strlabel.Append (Request.form ("Heightpixel")) Strlabel.Append ("<hr color = '# 000099></p> <p>") Strlabel.append (" Basic Information: <br> ") Strlabel.Append (" Type = "& bc.Type &" <br> ") strlabel.append (" Name = "& bc.browser &" <br> ") Strlabel.Append (" Version = "& bc.version &" <br> ") strlabel.append (" Major Version = "& bc.majorversion &" <br> ") strlabel.append (" minor Version = "& bc.minorversion &" <br> ") strlabel.append (" Platform = "& bc.platform &" <br> ") strlabel.append (" is beta = "& bc.beta &" <br > ") Strlabel.append (" is crawler = ") strlabel.append (" is aol = "& bc.aol &" <br> ") Strlabel.Append (" IS Win16 = "& bc.win16 &" <br> ") Strlabel.Append (" IS WIN32 = "& bc.win32 &" <br> ") strlabel.append (" support frames = "& bc.frames &" <br > ") Strlabel.append (" Support Tables = "& bc.Tables &" <br> ") strlabel.append (" Support cookies = "& bc.cookies &" <br> ") strlabel.append (" support VB Script = "& bc.vbscript &" <br> ") Strlabel.Append (" Support JavaScript = "& bc.javascript &" <br> ") strlabel.Append ("Support Java Applets =" & bc.javaApplets & "<br>") strlabel.append ("Support ActiveX Controls = & bc.activexControls &" <</p></div><div class="text-center mt-3 text-grey"> 转载请注明原文地址:https://www.9cbs.com/read-42013.html</div><div class="plugin d-flex justify-content-center mt-3"></div><hr><div class="row"><div class="col-lg-12 text-muted mt-2"><i class="icon-tags mr-2"></i><span class="badge border border-secondary mr-2"><h2 class="h6 mb-0 small"><a class="text-secondary" href="tag-2.html">9cbs</a></h2></span></div></div></div></div><div class="card card-postlist border-white shadow"><div class="card-body"><div class="card-title"><div class="d-flex justify-content-between"><div><b>New Post</b>(<span class="posts">0</span>) </div><div></div></div></div><ul class="postlist list-unstyled"> </ul></div></div><div class="d-none threadlist"><input type="checkbox" name="modtid" value="42013" checked /></div></div></div></div></div><footer class="text-muted small bg-dark py-4 mt-3" id="footer"><div class="container"><div class="row"><div class="col">CopyRight © 2020 All Rights Reserved </div><div class="col text-right">Processed: <b>0.041</b>, SQL: <b>9</b></div></div></div></footer><script src="./lang/en-us/lang.js?2.2.0"></script><script src="view/js/jquery.min.js?2.2.0"></script><script src="view/js/popper.min.js?2.2.0"></script><script src="view/js/bootstrap.min.js?2.2.0"></script><script src="view/js/xiuno.js?2.2.0"></script><script src="view/js/bootstrap-plugin.js?2.2.0"></script><script src="view/js/async.min.js?2.2.0"></script><script src="view/js/form.js?2.2.0"></script><script> var debug = DEBUG = 0; var url_rewrite_on = 1; var url_path = './'; var forumarr = {"1":"Tech"}; var fid = 1; var uid = 0; var gid = 0; xn.options.water_image_url = 'view/img/water-small.png'; </script><script src="view/js/wellcms.js?2.2.0"></script><a class="scroll-to-top rounded" href="javascript:void(0);"><i class="icon-angle-up"></i></a><a class="scroll-to-bottom rounded" href="javascript:void(0);" style="display: inline;"><i class="icon-angle-down"></i></a></body></html><script> var forum_url = 'list-1.html'; var safe_token = 'rNHXT7RQWIdCTbc2QgiWG7E37SEOoSdsNQGV_2FLfAnMh1wjRO_2FSturx7TyJK7RX1s0qJaVEOPXLtkyQFQrt67pA_3D_3D'; var body = $('body'); body.on('submit', '#form', function() { var jthis = $(this); var jsubmit = jthis.find('#submit'); jthis.reset(); jsubmit.button('loading'); var postdata = jthis.serializeObject(); $.xpost(jthis.attr('action'), postdata, function(code, message) { if(code == 0) { location.reload(); } else { $.alert(message); jsubmit.button('reset'); } }); return false; }); function resize_image() { var jmessagelist = $('div.message'); var first_width = jmessagelist.width(); jmessagelist.each(function() { var jdiv = $(this); var maxwidth = jdiv.attr('isfirst') ? first_width : jdiv.width(); var jmessage_width = Math.min(jdiv.width(), maxwidth); jdiv.find('img, embed, iframe, video').each(function() { var jimg = $(this); var img_width = this.org_width; var img_height = this.org_height; if(!img_width) { var img_width = jimg.attr('width'); var img_height = jimg.attr('height'); this.org_width = img_width; this.org_height = img_height; } if(img_width > jmessage_width) { if(this.tagName == 'IMG') { jimg.width(jmessage_width); jimg.css('height', 'auto'); jimg.css('cursor', 'pointer'); jimg.on('click', function() { }); } else { jimg.width(jmessage_width); var height = (img_height / img_width) * jimg.width(); jimg.height(height); } } }); }); } function resize_table() { $('div.message').each(function() { var jdiv = $(this); jdiv.find('table').addClass('table').wrap('<div class="table-responsive"></div>'); }); } $(function() { resize_image(); resize_table(); $(window).on('resize', resize_image); }); var jmessage = $('#message'); jmessage.on('focus', function() {if(jmessage.t) { clearTimeout(jmessage.t); jmessage.t = null; } jmessage.css('height', '6rem'); }); jmessage.on('blur', function() {jmessage.t = setTimeout(function() { jmessage.css('height', '2.5rem');}, 1000); }); $('#nav li[data-active="fid-1"]').addClass('active'); </script>