2015-10-16 139 views
0

我想在foxpro中制作一个程序,您可以在文本框中键入一个名称,它会自动在命令提示符下添加一个用户。所以netuser(名称)和一个按钮(添加用户) 问候Visual foxpro替换命令/ CMD

克里斯

回答

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 

这将创建一个新的用户到您的计算机没有任何密码。

+0

这就是我正在寻找..!我还在研究有没有办法将代码转换为表单设计? – Chris

+0

Foxpro没有像VB.NET或C#这样的语言形式和按钮的概念。但你当然可以画出边界。语法是@,, Lalu

+0

当然,它具有窗体,窗体类和可视化控件(如放置在按钮上的按钮)以及附加到.NET控制语言等控件的代码。实现是不同的,但特别是在.NET中使用WinForms时,这个概念非常相似。在.NET中,即使使用可视化设计器,也只是生成用于定义UI的代码。在Visual FoxPro中,表单等元数据在VCX/VCT文件中。 –

0

我想你应该看PowerShell的,而不是Visual FoxPro中。 如果您正在使用Foxpro的2.6(不是Visual版本),你可以使用接受命令:

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

嗯,也许他正在编写一个需要这样做的Visual FoxPro应用程序?绝对可以从内部运行PowerShell cmdlet。 –