重庆分公司,新征程启航
为企业提供网站建设、域名注册、服务器等服务
Option Explicit
为泊头等地区用户提供了全套网页设计制作服务,及泊头网站建设行业解决方案。主营业务为成都网站建设、成都网站制作、泊头网站设计,以传统方式定制建设网站,并提供域名空间备案等一条龙服务,秉承以专业、用心的态度为用户提供真诚的服务。我们深信只要达到每一位用户的要求,就会得到认可,从而选择与我们长期合作。这样,我们也可以走得更远!
Const CC_不关闭窗口 As String = " pause"
Private Sub Form_Load()
'在c:\ 建立一个 1.bat 的批处理文件,里面的内容为:
'dir
'然后,运行本程序,就可以不关闭窗口了。
Shell "c:\1.bat" CC_不关闭窗口, vbNormalFocus
End Sub
我觉得应该有两种解决方法
1:把patran的安装路径添加到系统环境变量的path属性下;
2:在你的批处理里面改为如下格式,patran完整路径(如c:\MSC.software\········patran.exe)+ "-sfp patran.ses",也就是下面这种情况试下“c:\MSC.software\········patran.exe -sfp patran.ses -b -ans yes”
不知道你所谓的选择目录使用的是什么方法,但不管什么方法,你的程序中肯定是知道这个目录的是吧?假定这个目录保存在变量d中,那么就是:
Shell d "\yijianguilei.bat", vbNormalFocus '注意那个括号是画蛇添足,可以去掉
App.Path就是软件所在目录,因此把它换成bat所在的目录不就行了?