Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2041 connectés 

  FORUM HardWare.fr
  Programmation
  ASP

  Problèle vbs dans asp

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Problèle vbs dans asp

n°1039901
chepa_jeml​s
Posté le 08-04-2005 à 12:28:21  profilanswer
 

j'ai un script qui fonctionne super bien quand je l'exécute avec cscript!!
 
et quand je le mets dans une page asp, cela ne marche pas du tout!!
 
voilà ma page asp:
 

Code :
  1. <% @Language="VBScript" %>
  2. <html>
  3. <body>
  4.  <%
  5.  'mise en session des variables
  6.  Session("liste_pc" )=Request.Form("computer" )
  7.  %>
  8.  <h2>Liste des machines sélectionnées:</h2><br>
  9.  <%
  10.  if Request.Form("computer" ).Count > 0 then
  11.   'Boucle tant qu'il y a des données dans la tableau computer
  12.   For increment = 1 To Request.Form("computer" ).Count
  13.    'Déclaration des variables
  14.    Dim min,chi,nb_carac
  15.    'Attribution du nombre de caractère
  16.    nb_carac=Session("nb" )
  17.    'remet la variable de code à vide
  18.    code= ""
  19.    'boucle pour le nombre de caracteres
  20.    For i = 1 To nb_carac
  21.     'remet les variables à zero
  22.     min = ""
  23.     chi = ""
  24.     'initialise le nombre aleatoire
  25.     Randomize
  26.     'définit le type 1->lettre 2->chiffre suivant le type de caractère
  27.     Select Case Session("type" )
  28.      Case "Numerique"
  29.       type_car = 2
  30.      Case "Alphabetique"
  31.       type_car = 1
  32.      Case "AlphaNumerique"
  33.       type_car = Int(2 * Rnd + 1)
  34.     End Select
  35.     'switch sur le type
  36.     Select Case type_car
  37.      'les limites sont fixés par la table de caracteres ANSI
  38.      Case 1 'lettre
  39.       Randomize
  40.       min = Int((122 - 97 + 1) * Rnd + 97)
  41.       code = code & Chr(min)
  42.      Case 2 'Chiffre
  43.       Randomize
  44.       chi = Int((57 - 48 + 1) * Rnd + 48)
  45.       code = code & Chr(chi)
  46.     End Select
  47.    Next
  48.    machine=Request.Form("computer" )(increment)
  49.    Response.Write machine & " " & code & "<br>"
  50.    Set objUser=GetObject("WinNT://"& machine &"/Administrateur" )
  51.    objUser.SetPassword code
  52.    onjUser.SetInfo
  53.   Next
  54.  Else
  55.   Response.Write "Aucune machine n'a été sélectionnée <br>"
  56.  End If
  57.  %>
  58. </body>
  59. </html>


 
Voilà mon erreur:
 

Code :
  1. Impossible d'afficher la page
  2. Un problème est survenu dans la page que vous essayez d'ouvrir et vous ne pouvez donc pas afficher cette page.
  3. --------------------------------------------------------------------------------
  4. Essayez les opérations suivantes :
  5. Cliquez sur le bouton Actualiser ou réessayez plus tard.
  6. Ouvrez la file:// page d'accueil, puis recherchez les liens vers les informations souhaitées.
  7. HTTP 500.100 - Erreur interne au serveur - Erreur ASP
  8. Services Internet (IIS)
  9. --------------------------------------------------------------------------------
  10. Informations techniques (destinées au personnel du Support technique)
  11. Type d'erreur :
  12. Active Directory (0x80070005)
  13. Erreur d'accès général refusé
  14. /fin.asp, line 52
  15. Type de navigateur :
  16. Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0; MyIE2; .NET CLR 1.1.4322)
  17. Page :
  18. POST 61 bytes to /fin.asp
  19. POST Data:
  20. computer=LAB05&computer=LAB11&Soumettre=Etape+Suivante+%3E%3E
  21. Heure :
  22. vendredi 8 avril 2005, 12:18:38
  23. Informations complémentaires :
  24. Support technique Microsoft

mood
Publicité
Posté le 08-04-2005 à 12:28:21  profilanswer
 

n°1044246
chepa_jeml​s
Posté le 12-04-2005 à 14:39:11  profilanswer
 

personne ne sait m'aider? c'est niveau du changement de mot de passe!! quelqu'un sait me dire?

n°1044420
chepa_jeml​s
Posté le 12-04-2005 à 16:07:34  profilanswer
 

comment modifier?  
 
Personne ne sait me dire?car je voix pas torp l'erreur!!
 
tu sais pas?

n°1045334
chepa_jeml​s
Posté le 13-04-2005 à 08:17:51  profilanswer
 

changement de mot de passe d'adiminstrateur local sur une machine d'un domaine

n°1045739
chepa_jeml​s
Posté le 13-04-2005 à 13:26:44  profilanswer
 

bne c'est bizzard que en lancant simplement le cript vbs ca marche alors que si je le met dans une page asp, cela ne marche pas!!
 
c'est normal?

n°1047327
chepa_jeml​s
Posté le 14-04-2005 à 13:37:08  profilanswer
 

je viens de tester sur un serveur avec le tout d'installer, il me faittoujours la même erreur!! pourtant je suis bien connecté en admin!!!
 
Y a t il quelque chose à parametrer sous iis pe?

n°1103649
nfaugout
Posté le 01-06-2005 à 08:51:26  profilanswer
 

chepa_jemls a écrit :

je viens de tester sur un serveur avec le tout d'installer, il me faittoujours la même erreur!! pourtant je suis bien connecté en admin!!!
 
Y a t il quelque chose à parametrer sous iis pe?


 
Salut,
quand tu exécutes ton script VBS, comme tu es connecté en tant qu'admin sur ta machine, le script s'exécute avec les droits admin. Par contre dans une page ASP, le script s'exécute avec les droits de l'utilisateur IUSR_<nomDeTaMachine> qui n'est pas admin donc ne peut pas changer le mot de passe. Il faut que tu lui donnes les mêmes droits que l'admin. Mais ce n'est pas conseillé!


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  ASP

  Problèle vbs dans asp

 

Sujets relatifs
Plus de sujets relatifs à : Problèle vbs dans asp


Copyright © 1997-2025 Groupe LDLC (Signaler un contenu illicite / Données personnelles)