0/5 (4 avis)
Vue 33 220 fois - Téléchargée 786 fois
<% ' ***************************************************************************** ' 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>
20 mars 2008 à 11:17
Donc je dis 10/10 et un grand merci surtout
11 mai 2005 à 14:43
Merci d'avance
4 nov. 2002 à 15:17
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
19 sept. 2002 à 15:07
Server Variable,
Value,
<% For Each name In Request.ServerVariables %>
----
<%= name %>,
<%= Request.ServerVariables(name) %>,
<% Next %>
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.