【问题标题】:Visual foxpro Replace commands / CMDVisual foxpro 替换命令/CMD
【发布时间】:2015-11-01 23:28:53
【问题描述】:

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

克里斯

【问题讨论】:

    标签: foxpro


    【解决方案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
    

    这将为您的计算机创建一个新用户,无需任何密码。

    【讨论】:

    • 这就是我要找的..!我还在研究有没有办法把代码变成表单设计?
    • Foxpro 没有像 VB.NET 或 C# 这样的语言那样的表单和按钮的概念。但是你当然可以画边界。语法是@, to ,
    • 当然,它有表单、表单类、视觉控件(如放置在其上的按钮)以及附加到这些控件的代码(如 .NET 语言)。实现是不同的,但特别是在 .NET 中使用 WinForms 时,概念非常相似。在 .NET 中,即使您使用可视化设计器,这也只会生成代码来定义 UI。在 Visual FoxPro 中,表单等的元数据位于 VCX/VCT 文件中。
    • 我说的是 foxpro 而不是视觉 foxpro。
    • 仍然有表单(屏幕)和控件,实际上它们更像 .NET WinForms 世界,因为屏幕生成器只是一个代码生成器。
    【解决方案2】:

    我认为您应该关注 Powershell 而不是 Visual Foxpro。 如果您使用的是 Foxpro 2.6(不是 Visual 版本),您可以使用 Accept 命令:

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

    【讨论】:

    • 嗯,也许他正在编写一个需要执行此操作的 Visual FoxPro 应用程序?不过,他绝对可以在其中运行 PowerShell cmdlet。
    猜你喜欢
    • 1970-01-01
    • 2017-05-31
    • 1970-01-01
    • 1970-01-01
    • 2022-09-27
    • 1970-01-01
    • 1970-01-01
    • 1970-01-01
    • 2013-11-03
    相关资源
    最近更新 更多