Non so se la sezione è giusta, dato che contiene anche elementi di programmazione. Nel caso chiedo ai moderatori di posizionare il topic nella sezione più adatta.

Ho bisogno di creare utenti ftp sul mio server windows 2003 da dei pc client.

Ho creato una pagina asp che richiama una funzione da una dll da me creata:

<%

dim obj
Set obj = server.CreateObject("esegui.funcEsegui")


Response.Write("Error Code: " & obj.runexe(server.mappath("eseguiftp.exe")))

%>
il codice della dll è il seguente:

Option Explicit

Public Function RunExe(ByVal Filename As String) As Long
On Error Resume Next

Shell Filename

RunExe = Err.Number

End Function
Sul server ho il programma "eseguiftp.exe" che contiene questo codice:

Private Sub Form_Load()

Shell "CMD.exe /c MD C:\WEBDIR\FTP\mioutente", vbHide
Shell "CMD.exe /c cacls c:\webdir\ftp\mioutente/R USERS /e", vbHide
Shell "CMD.exe /c cacls c:\webdir\ftp\mioutente/G mioutente:f /E", vbHide
Shell "CMD.exe /c net user mioutente miapwd /add", vbHide

End

End Sub

Ora, quando apro la pagina asp, sul server viene eseguito il file "eseguiftp.exe", il programma crea correttamente la cartella e genera i permessi, ma non aggiunge l'utente "mioutente".

Se però eseguo "eseguiftp.exe" direttamente sul server facendoci doppio clic funziona correttamente senza saltare nessun comando.

Sapete dirmi dov'è il problema?