2015-10-16 136 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。 –