è possibile leggere il nome di un computer remoto?
ossia come nelle proprietà delle email viene evidenziato
Received: from server1 (xx.xx.xxx.xxx) by vsmtp2.tin.it (x.x.xxx)
esiste un modo per determinare il nome ossia server1 ?
mille grazie
è possibile leggere il nome di un computer remoto?
ossia come nelle proprietà delle email viene evidenziato
Received: from server1 (xx.xx.xxx.xxx) by vsmtp2.tin.it (x.x.xxx)
esiste un modo per determinare il nome ossia server1 ?
mille grazie
Alex
Lato client? chi si connette al tuo client?
Forse hai sbagliato forum... se spieghi meglio cosa ti occorre ti sposto in quello piu' adatto![]()
Il guaio per i poveri computers e' che sono gli uomini a comandarli.
Attenzione ai titoli delle discussioni: (ri)leggete il regolamento
Consultate la discussione in rilievo: script / discussioni utili
Usate la funzione di Ricerca del Forum
no lato server
vorrrei inserire nei log di un sito web non solo Ip ed user agent ma anche il nome del computer remoto che si collega la mio server.
Spero di nn aver sbagliato sezione perchè il sito è in asp ma le Request.ServerVariables non consentono di ottenere questo informazione per cui avevo pensto ad uno script
se poi le mie considerazioni sono errate ti ringrazio per lo spostamento del mio messaggio
brazie mille
ciao
Alex
Non puoi.
con asp lo so che non posso
ma con java o altro sistema di programmazione non si può?
Avevo postato in scripting ma mi hanno spostato
garzie
Alex
Il perche' mi sembrava chiaro... non e' possibile lato clientAvevo postato in scripting ma mi hanno spostato![]()
Ovviamente e' possibile solo in una intranet dotata di DNScodice:<% NomeMacchina = "" On Error Resume Next ip = Request.ServerVariables("REMOTE_ADDR") Set Shell = Server.CreateObject("Wscript.Shell") Set Fso = Server.CreateObject("Scripting.FileSystemObject") Path = Server.MapPath(".") & "\" & Session.SessionID & ".txt" Shell.run "%comspec% /c tracert " & ip & " > " & Path ,0 , True set f = Fso.OpenTextFile(Path) While not f.AtEndOfStream Riga = f.Readline If InStr(Riga,"[")>0 then r = InStr(Riga,"[") l = InStrRev(Riga, " ", r-2) NomeMacchina = Mid(Riga,l+1,r-l-2) end if Wend Response.Write ip & " = " & NomeMacchina Set fso = Nothing Set Shell = Nothing %>![]()
ciao
Il guaio per i poveri computers e' che sono gli uomini a comandarli.
Attenzione ai titoli delle discussioni: (ri)leggete il regolamento
Consultate la discussione in rilievo: script / discussioni utili
Usate la funzione di Ricerca del Forum
Scusate se riesumo i post oramai sepolti....Originariamente inviato da br1
Ovviamente e' possibile solo in una intranet dotata di DNS![]()
ciao
.... ma come si fa in una Intranet, visto che mi servirebbe?![]()