1. Accueil
  2. ASP / ASP.NET
  3. Sources ASP / ASP.NET
  4. Sources Système
  5. Afficher le nom de la machine + login + domaine

Afficher le nom de la machine + login + domaine

0/5 (4 avis)

Vue 33 220 fois - Téléchargée 786 fois


Télécharger le projet
Commenter

Description

Si les infos ne s'affichent pas ou que cela fait une erreur, 2 possibilités :
- Vous n'avez pas les droits (à vérifier si l'on peut bloquer ce genre d'accès)
- Vous avez une ancienne version de Windows Script sur votre serveur

Source / Exemple : 


<%
' *****************************************************************************
' Réalisé par Nicolas SOREL ( Nix pour les intimes :) )
' Pour le site ASPFr.com
' Retrouvez d'autres scripts ASP sur www.ASPFr.com
' Vous avez le droit d'utiliser ce script dans vos pages mais si vous souhaitez
' l'exposer sur un autre site de programmation merci de me contacter
' (nix@codes-sources.com)
' *****************************************************************************
%>
<html>
	<head>
		<title>Le Login et le nom du Serveur</title>
	</head>
	<body bgcolor="#FFFFFF" text="#000000" link="#0000FF" vlink="#0000FF" alink="#FF0000">
		<font face="Verdana" size="2">
			<b>Information récupérées grace que Windows Scripting.<br>
			Vous devez avoir Windows Script 5.x installé sur votre server<br>
			Si les infos ne s'affichent pas, allez sur <a href="http://msdn.microsoft.com/scripting">msdn.microsoft.com/scripting</a>
			pour télécharger la dernière version de Windows Scripting</b><br><br>
			<%
				Dim WsNet
				Set WsNet = Server.CreateObject("Wscript.Network")
			%>
				Nom de la machine : <b><%=WsNet.ComputerName%></b><br>
				Nom de l'utilisateur connecté a cette page : <b><%=WsNet.UserName%></b><br>
				Domaine : <b><%=WsNet.UserDomain%></b><br>
			<% Set WsNet = Nothing%>
	</font>
	</body>
</html>
Télécharger le projet

Codes Sources

A voir également

Ajouter un commentaire Commentaires
foliv57
Messages postés
420
Date d'inscription
vendredi 17 novembre 2006
Statut
Membre
Dernière intervention
15 juillet 2014
 9
20 mars 2008 à 11:17
Simple, efficace, claire et en plus ca marche.
Donc je dis 10/10 et un grand merci surtout
lutin2004
Messages postés
28
Date d'inscription
vendredi 1 octobre 2004
Statut
Membre
Dernière intervention
31 août 2005
11 mai 2005 à 14:43
Est-ce que qqn connait un moyen d'obtenir les mêmes infos mais en asp.NET
Merci d'avance
bbsonic2
Messages postés
1
Date d'inscription
mercredi 30 janvier 2002
Statut
Membre
Dernière intervention
4 novembre 2002
4 nov. 2002 à 15:17
Merci, bcp !!!
je cherché un bout de code simple me permettant de recuperer le nom netbios de la machine.
Pour notre ami C29pich, il n'a pas compris toute l'utilité de cette methode, qui permet de recuperer des informations qui ne sont pas dependante de IIS, mais du system.

Merci encore.

bibliotheque wscript : Scripting.Signer Object, WScript Object, WshArguments, bject, WshController Object, WshEnvironment Object, WshNamed Object,
WshArguments object, WshNetwork Object, WshRemote Object, WshRemoteError Object, WshScriptExec Object, WshShell Object, WshShortcut Object,
WshSpecialFolders Object, WshUnnamed Object, WshArguments object,
WshUrlShortcut Object
C29Pich
Messages postés
7
Date d'inscription
jeudi 19 septembre 2002
Statut
Membre
Dernière intervention
24 mai 2006
19 sept. 2002 à 15:07
il suffit d'utiliser les variables serveur :

Server Variable,
Value,

<% For Each name In Request.ServerVariables %>
----

<%= name %>,
<%= Request.ServerVariables(name) %>,

<% Next %>
S'inscrire maintenant

Vous n'êtes pas encore membre ?

inscrivez-vous, c'est gratuit et ça prend moins d'une minute !

Les membres obtiennent plus de réponses que les utilisateurs anonymes.

Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.

Le fait d'être membre vous permet d'avoir des options supplémentaires.

Du même auteur (Nix)