有点蓝 老师 参照你提供的帮助 写入注册表方式
运用如下代码 项目会默认打开依旧没有获得管理员权限 怎么修正一下 项目默认打开 直接运行11.bat获得管理员权限并打开项目主体文件
经显示查看count不为零 项目没有运行bat文件
请教一下 在哪里可以写上当项目运行一次之后就默认把count清零 便于下一次启动时候 项目只运行一次bat文件
试了一下 命令窗口清零count
然后项目会自动连续运行两次 第一次打开的窗体是没有以管理员权限运行的 第二次打开的窗体是以管理员权限运行的 两个窗体都显示出来了
有没有办法只显示一个窗体 也就是项目只运行一次 并且是以管理员权限运行的
想实现的是：项目模拟点击或者直接运行11.bat文件一次 直接获得管理员权限运行项目文件
BeforeOpenProject事件代码如下：Dim Count As Integer
Count = Registry.GetValue("HKEY_CURRENT_USER\Software\MyApp","Count",0)
If Count=0 Then
Registry.SetValue("HKEY_CURRENT_USER\Software\MyApp","Count",Count + 1)
Dim Proc As New Process '定义一个新的Process
Dim batPath As String = projectpath & "11.bat" '指定要打开的bat文件
Proc.StartInfo.WorkingDirectory = FileSys.GetParentPath(batPath)
Proc.StartInfo.FileName = batPath
Proc.StartInfo.CreateNoWindow = False
Proc.Start()
End If
[此贴子已经被作者于2020/11/5 16:17:36编辑过]
加好友 
发短信
Post By：2020/11/5 14:03:00 [只看该作者]
