HFSS VBS 导出solution
时间：10-02
整理：3721RD
点击：
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")
还有就是如果变量很多，可以考虑写循环语句导出，以减少工作量
谢谢楼上的 我试了好久都不行