Visual foxpro Заменить команды/CMD

Question

Я хочу сделать программу в foxpro, где вы можете ввести имя в текстовое поле, и оно автоматически добавит пользователя в командной строке. Так NetUser (имя) и кнопка (добавить пользователя) Привет

Chris

Answer 1

* Does the initial setting for foxpro 
* 
set echo off 
set talk off 
set step off 
set date british 
set century on 
set intensity off 
set delimiter on 
set delimiter to '[]' 
set scoreboard off 
set menu off 
set safety off 
set deleted on 
set escape on 
set device to screen 
set color to 
set exclusive on 
set status on 
set bell off 
clear all 
clear program 
clear 
* 
** define a variable to store user name to be created 

muser_name = space(20) 
@ 12, 22 say 'Enter User Name ' get muser_name 
read 
if !empty(muser_name) 
    * this command adds a new user to the computer 
    run net user &muser_name /add 
endif 
wait 
clear 
clear program 
return 
** 
* end of program 

Это позволит создать новый пользователь к вашему компьютеру без пароля.

Answer 2

Я думаю, вы должны смотреть на Powershell вместо Visual FoxPro. Если вы используете Foxpro 2.6 (не визуал версию) можно использовать команду Accept:

DO WHILE .t. 
    ACCEPT "Enter username:" to mUser 
    IF len(trim(mUser)) = 0 
     exit 
    ENDIF 
    run net user &mUser /add 
ENDDO