webForumDet fria alternativet

Hämta besöks information?

ASP

14 svar · 1 316 visningar · startad av Bosse168

Medlem sedan nov. 20031 018 inlägg
Frågan#1

Hur gör man fär att hämta vilken sorts webbläsare man använder och operativsystem man använder när man besöker sidan, så som det är på denna sida:

Mitt IP

Medlem sedan jan. 20011 213 inlägg
Medlem sedan nov. 20031 018 inlägg
#3

Ok men hur får man fram vilket ISP man använder?

Medlem sedan nov. 20031 018 inlägg
#4

Ingen som vet hur jag kan få in besökarens ISP i en variabel?

Medlem sedan mars 20015 287 inlägg
Medlem sedan nov. 20031 018 inlägg
#6

Kollade där men är inte speciellt haj på XMLHTTP.
Någon som vet hur koden ska se ut?

Medlem sedan jan. 20032 285 inlägg
#7

Just nu verkar sgtpeppers funktion inte fungera, men en XMLHTTP-kod skulle kunna se ut så här på ett ungefär:

Set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
objHTTP.Open "GET", "http://www.domän.com", False
objHTTP.Send
strBody = objHTTP.ResponseBody

For i = 1 To LenB(strBody)
  strTemp = strTemp & Chr(AscB(MidB(strBody, i, 1)))
Next

strBody = strTemp
Set objHTTP = Nothing
Response.Write(Server.HTMLEncode(strBody))
Medlem sedan jan. 20032 285 inlägg
#8

Såja, det här är det bästa jag kan få till i alla fall. :)

Function GetISP(strIP)
  Set objHTTP = Server.CreateObject("Microsoft.XMLHTTP")
  objHTTP.Open "GET", "http://www.ripe.net/perl/whois?form_type=simple&full_query_string=&searchtext=" & strIP & "&do_search=Search", False
  objHTTP.Send
  strHTML = objHTTP.ResponseText
  Set objHTTP = Nothing

  With New RegExp
    .IgnoreCase = True
    .Global = False
    .Pattern = "descr:[^\n]+"

    For Each Match In .Execute(strHTML)
      strMatch = Trim(Mid(Match.Value, 7))
    Next
  End With

  GetISP = strMatch
End Function

Response.Write(GetISP("193.13.74.255"))

Tacka solis för adressen till sidan där man kan få tag på informationen.

Medlem sedan nov. 20031 018 inlägg
#9

Ni är ta mé fan bäst :-)

Medlem sedan mars 20015 287 inlägg
#10

Snyggt jobbat!

Medlem sedan maj 20031 173 inlägg
#11

gammal tråd jag letat upp här...

Om man försöker skicka många request till den servern får man detta:

Resource Temporarily Unavailable
Your access to the whois web interface has been temporarily denied due to excessive query behaviour. Please try again in a short while.

The most likely reason for this is that you are doing scripted queries for data. If this is the case, please use directly the whois query interface and protocol on port 43 of whois.ripe.net instead.

Please contact webmaster@ripe.net with queries about this policy, or if you think access has been denied inappropriately.

dvs, det verkar vara helt ok att skicka många frågor, fast man får skriva dem på ett annat sätt. dock förstår jag inte alls hur.

sen är väl ripe bara för europa? någon som vet hur man kan göra för att få med andra världsdelar? hittade dessa:
http://www.apnic.net/ för Asia
http://www.arin.net/ för Nordamerika
http://lacnic.net/en/index.html för Sydamerika

Tack!

Medlem sedan juli 20041 183 inlägg
#12

Är det någon som kommit på hur man skriver för att konatkta port 43 på whois.ripe.net och hur man skall hantera eventuella svar???

Går det att få fram Reverse DNS eller RDNS som det också kallas där??

Medlem sedan dec. 19996 721 inlägg
Medlem sedan juli 20041 183 inlägg
#14

men den kräver ju att du installerar en komponent, eller?? jag har min sida på ett extern webhotell där jag inte har någon tillgång att installera sånt...

Medlem sedan maj 20031 173 inlägg
#15

testade att installera den komponenten men har ingen anning om hur jag ska skriva själva whois frågan till server och hur jag ska ta hand om svaret. något förslag?

hmm, emission länk med exempel funkade ju utmärkt... :r

272 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
128 ms — deklarationer (db)
0 ms — hämta statistik (cache)
140 ms — hämta tråd, inlägg och bilagor (db)
129 ms — ändringar (db)