CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede henrik_n Nybegynder
27. august 2003 - 14:17 Der er 7 kommentarer og
1 løsning

Indsætte "wsname" i Asp med henblik på logning

I forbindelse med logning af brugeren på vores lokale intranet ønsker jeg at indsætte navnet(wsname) fra selve pc´en.
Ip-nr. er ikke fast på vores DHCP-server og derfor er det nødvendigt at indsætte navnet for senere evt. at kunne identificere hvilken pc der er anvendt.
Jeg har ikke kunnet finde nogen servervariabler eller lignende der kunne bruges!
Avatar billede tchami Nybegynder
28. august 2003 - 08:08 #1
Måske du kan bruge Request.ServerVariables("LOGON_USER") der finder brugernavnet på den der er logget ind.

Ellers kan nedenstående script måske bruges:

<%@ Language=VBScript %>
<% Response.Expires = -1 %>
<html>
<head>
</head>
<SCRIPT LANGUAGE=VBScript>
<!--
Option Explicit

Sub document_onreadystatechange

    On Error Resume Next
<%
    Dim wshNetwork, ComputerName
      Set wshNetwork = CreateObject("WScript.Network")
      ComputerName = wshNetwork.ComputerName
%>
    msgbox "<%=ComputerName%>"
End Sub

-->
</SCRIPT>


<body>
"<%=Request.ServerVariables("REMOTE_HOST")%>"

</body>

</html>
Avatar billede henrik_n Nybegynder
28. august 2003 - 10:57 #2
Hej tchami

Scriptet virker, men jeg får serverens navn og jeg skal bruge
computerens navn. Den computer der har aktiveret asp siden.

Brugeren kan jo arbejde på forskellige computere og da vores intranet ikke har faste IP-numre skifter nummeret.
Jeg kan finde oplysninger om hvorfra brugeren er logget på i loggen fra EventWiever på vores Server, men det ville være rart hvis jeg kunne nøjes med en log.

LOGON_USER og REMOTE_HOST kender jeg og er ok.
Avatar billede kichian Nybegynder
28. august 2003 - 13:22 #3
http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:80/support/kb/articles/Q245/5/74.ASP&NoWebContent=1
Avatar billede kichian Nybegynder
28. august 2003 - 13:23 #4
Med ovenstående skulle REMOTE_HOST give dig computernavnet.
Avatar billede henrik_n Nybegynder
28. august 2003 - 14:53 #5
Jeg får følgende fejl ved andvendelse af de 2 foreslåede script.

<font face="Arial" size=2>error '800401e4'</font>
<p>
<font face="Arial" size=2>Invalid syntax
</font>
<p>
<font face="Arial" size

Jeg har prøvet disse script.

Denne skulle generelt give tilladelse til Reverse DNS Lookup

<%
Dim oIIS
Dim vEnableRevDNS
Dim VDisableRevDNS

vEnableRevDNS = 1
vDisableRevDNS = 0

Set oIIS = GetObject("ISS://localhost/w3svc")
oIIS.Put "EnableReverseDNS", vEnableRevDNS
oIIS.SetInfo
Set oIIS = Nothing


%>

Denne skulle give tilladelse til enkelte afhængig af sidens interne nr.

<%
Dim oIIS
Dim vEnableRevDNS
Dim VDisableRevDNS

vEnableRevDNS = 1
vDisableRevDNS = 0

Set oIIS = GetObject("ISS://localhost/w3svc/1/ROOT")
oIIS.Put "EnableReverseDNS", vEnableRevDNS
oIIS.SetInfo
Set oIIS = Nothing


%>

Kan det evt. skyldes at jeg bruger ODBC logning på IIS-serveren og ikke som der omtales W3SVC-logning ?
Kan det være generel opsætningfejl i IIS-serveren ?

Jeg har prøvet at ændre "localhost" til serverens navn. Det gav ingen ændring.


mvh.

Henrik
Avatar billede henrik_n Nybegynder
28. august 2003 - 15:27 #6
Hej Kichian

Ups- jeg har opdaget jeg skrev forkert i den ene linie og nu virker det fint.  det skulle være - GetObject("IIS://localhost/w3svc/1/ROOT")
Jeg får navnet som jeg ønsker det.
Laver du et svar så du kan få dine point!!

mvh

Henrik
Avatar billede kichian Nybegynder
30. august 2003 - 13:25 #7
Et svar
Avatar billede henrik_n Nybegynder
08. september 2003 - 08:51 #8
Tak for hjælpen.

mvh

Henrik
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Optimer MySql table med ASP Af poulmadsen i ASP 4 26/04/202417:16 26/04/202418:37
JSON Af ingeman i ASP 3 07/04/202417:53 08/04/202412:09
Vis detaljeret fejlkoder Af poulmadsen i ASP 6 09/03/202418:16 10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP 10 15/10/202313:12 18/10/202308:48
Udregn afstand mellem 2 koordinater - virker ikke med variabler Af sorenmt84 i ASP 5 25/09/202321:26 26/09/202321:58
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 15:30 signalforstærker til trådløs rutrer tænkes brugt til pc næt pc -og MÅSKE TV 4 m borte eller begge Af Novice-1 i Routere & Switches
I dag 11:43 Hvilket styresystem på en gammel Pc ??? Af Jan Post i Andre styresystemer
I dag 07:44 Virus advarsler - falske Af jdann i Backup- & Antivirus
I går 19:32 Formler der blev væk Af Klaus W i Excel
I går 15:22 Hent array key Af nemlig i PHP
White papers
Flere white papers »


Premium
Teaser billede
Her er de nye medlemmer af Statens It-råd: Skal vurdere it-projekter på over 15 millioner kroner
Læs mere »
Antallet af anmeldelser af ulovligt indhold på beskedtjenester stiger: Regeringen skubber ansvaret videre til EU og Belgien
Efter masser af kritik af store prisstigninger: VMware åbner for gratis licenser - ændrer i licens-strukturen
Seks store selskaber med på årets image-liste for første gang: Kæmper alle med lav kendskabsgrad
Se alle »
Computerworld
Teaser billede
Nyopdaget sårbarhed rammer næsten alle VPN'er: Gør dem usikre og nærmest ubrugelige
Læs mere »
Om under en uge går det løs: Pc’en bliver aldrig den samme igen
VPN-test fra virkeligheden: To tjenester som glimrer på hver deres måde
Test: Samsungs nyeste laptop er noget af det tætteste du kommer på en Windows-Macbook
Se alle »
CIO
Teaser billede
Nu begynder den største GDPR-retssag mod dansk myndighed nogensinde: Står over for million-bøde
Læs mere »
Lukker it-systemerne ned i to uger på grund af implementering: Den bedste måde at sikre, at ingen data går tabt
Sådan har Coop sagt farvel til mainframen - sparer et to-cifret millionbeløb årligt på licenser
Hundredevis af selskaber klager over Microsofts licens-policy: Vi er låst fast og bundet
Se alle »
Job & Karriere
Teaser billede
Her er Danmarks fem bedste CIO’er lige nu: Se de fem nominerede til prisen som Årets CIO 2024
Læs mere »
Medarbejderne fik udleveret badetøfler ved indflytningen: Kom med inden for i IBM Danmarks nye topmoderne hovedkontor
Så meget tjener dine kollegaer: Her er alle data fra Computerworlds store it-lønstatistik for 2024
Får du den løn, du fortjener? Få overblikket over hvor meget dine kolleger tjener hver måned
Se alle »
White paper
Teaser billede
Få mere ud af din cloudinfrastruktur og gør op med de konstant stigende omkostninger
Læs mere »
Opdag fordelene ved cloud-baseret backup og recovery
Unbreakable - sådan sikrer du dig vedvarende og uafbrudt adgang til dine data
Sæt turbo på din cloudperformance og minimér risikoen for DDoS-angreb
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »