符合中小企业对网站设计、功能常规化式的企业展示型网站建设
本套餐主要针对企业品牌型网站、中高端设计、前端互动体验...
商城网站建设因基本功能的需求不同费用上面也有很大的差别...
手机微信网站开发、微信官网、微信商城网站...
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所在的目录不就行了?