vbs脚本执行 vbs脚本一键导入导出HFSS的Local Variables

11/28 09:15:34 来源网站:seo优化-辅助卡盟平台

更新参量主要使用到SetVariableValue()这个函数卡盟,通过vbs脚本读取目标路径下的txt文件数据,然后通过分隔符来分割分别获取所有变量名和变量值vbs脚本执行,最后oDesign.SetVariableValue函数进行参量的一键更新,整段代码如下(文末二维码附有下载链接):

' ----------------------------------------------' ImportVariables,适用于ANSYS ElectronicsDesktop Version(2017, 2)及以上' ----------------------------------------------Dim oAnsoftAppDim oDesktopDim oProjectDim oDesignDim oEditorDim oModuleSet oAnsoftApp = CreateObject("Ansoft.ElectronicsDesktop")Set oDesktop = oAnsoftApp.GetAppDesktop()oDesktop.RestoreWindowSet oProject = oDesktop.GetActiveProject()Set oDesign = oProject.GetActiveDesign()FileDir="C:\Users\Administrator\Desktop\VBS\test.txt"Set Object = CreateObject("Scripting.FileSystemObject")Set fid=Object.OpenTextFile(FileDir,1,True)Do While fid.AtEndOfLine <> True  content=fid.ReadLine  pos=InStr(1,content,"=")  Number=Len(content)  VariableName=left(content,pos-1)  VariableValue=right(content,Number-pos)  oDesign.SetVariableValue VariableName,VariableValueloopfid.CloseoDesktop.AddMessage oProject.GetName(), oDesign.GetName(), 0, "----------------------------------------------------------"oDesktop.AddMessage oProject.GetName(), oDesign.GetName(), 0, FileDiroDesktop.AddMessage oProject.GetName(), oDesign.GetName(), 0, "Import variables complete!"

这两段vbs代码使用前需要根据个人电脑进行对FileDir路径进行重新赋值,然后右键以记事本打开,通过文件->另存为视查是否以ANSI格式保存。

接下来需要打开一个工程文件,点击高亮以激活需要操作的设计文件,通过Run Script去执行参量导入和导出功能。

操作视频如下:

需要注意的是,本vbs代码需要在HFSS17.2版本及以上运行!如果HFSS15想运行此代码,需要将ExportVariables.vbs和ImportVariables中的Ansoft.ElectronicsDesktop替换为AnsoftHfss.HfssScriptInterface,并且注释掉oDesktop.AddMessage开头的几处代码,如下图所示。

    暂无相关资讯
vbs脚本执行 vbs脚本一键导入导出HFSS的Local Variables