- 易迪拓培训,专注于微波、射频、天线设计工程师的培养
HFSS VBS 导出solution
录入：edatop.com 点击：
sweeping 了两变量 width, radius
想把所有的数据用VBS 导出来 ，根据变量命名～
Dim oAnsoftApp
Dim oDesktop
Dim oProject
Dim oDesign
Dim oEditor
Dim oModule
Set oAnsoftApp = CreateObject("AnsoftHfss.HfssScriptInterface")
Set oDesktop = oAnsoftApp.GetAppDesktop()
oDesktop.RestoreWindow
Set oProject = oDesktop.SetActiveProject("CSM018XFORMER")
Set oDesign = oProject.SetActiveDesign("CSM018_2T_XFORMER_Sym")
Set oModule = oDesign.GetModule("Solutions")
oModule.ExportNetworkData_
"width=9um", Array("10GHz1:Sweep"), 3,_
"D:/xx/HFSS_PRJ/CSM018XFORMER_CSM018_2T_XFORMER_Sym_width941.s4p", Array("All"),_
true, 50, "S", -1, 0, 15
用ExportNetworkData 可以指定一个width 或者 radius的变量，有一个默认的变量
为啥不能两个一起指定呢 比如我想到处 width=9um radius=41um 改如何做
请指点～谢谢
想把所有的数据用VBS 导出来 ，根据变量命名～
Dim oAnsoftApp
Dim oDesktop
Dim oProject
Dim oDesign
Dim oEditor
Dim oModule
Set oAnsoftApp = CreateObject("AnsoftHfss.HfssScriptInterface")
Set oDesktop = oAnsoftApp.GetAppDesktop()
oDesktop.RestoreWindow
Set oProject = oDesktop.SetActiveProject("CSM018XFORMER")
Set oDesign = oProject.SetActiveDesign("CSM018_2T_XFORMER_Sym")
Set oModule = oDesign.GetModule("Solutions")
oModule.ExportNetworkData_
"width=9um", Array("10GHz1:Sweep"), 3,_
"D:/xx/HFSS_PRJ/CSM018XFORMER_CSM018_2T_XFORMER_Sym_width941.s4p", Array("All"),_
true, 50, "S", -1, 0, 15
用ExportNetworkData 可以指定一个width 或者 radius的变量，有一个默认的变量
为啥不能两个一起指定呢 比如我想到处 width=9um radius=41um 改如何做
请指点～谢谢
我的一切正常呢？
可以试一试将
"width=9um"
替换为
Array("width:=", "9um","radius:=", "41um")
还有就是如果变量很多，可以考虑写循环语句导出，以减少工作量
谢谢前面的我试了好久都不行
申明：网友回复良莠不齐，仅供参考。如需专业解答，请学习易迪拓培训专家讲授的HFSS视频培训教程。
