189 8069 5689
vbs是解释执行的，在网页上运行的一般用的是 IE的库，或者是ASP的库，直接改后缀那种用的是mscrpt 的库，所以很多对象是不能通用的
创新互联专注为客户提供全方位的互联网综合服务，包含不限于成都网站制作、成都网站建设、外贸营销网站建设、南漳网络推广、微信小程序开发、南漳网络营销、南漳企业策划、南漳品牌公关、搜索引擎seo、人物专访、企业宣传片、企业代运营等，从售前售中售后，我们都将竭诚为您服务，您的肯定，是我们最大的嘉奖；创新互联为所有大学生创业者提供南漳建站搭建服务，24小时服务热线：18982081108，官方网址：www.cdcxhl.com
VB.net 编写的程序当然可以XP上运行，但是要用到.NET的库，就是要装相应版本的net framework 才可以运行！
VBS可以被dreamweaver 记事本 EditPlus 等文本编辑器 编辑由IIS 解释执行
不可以移植到VB.Net中
VBS 全称是VBScript 是脚本语言没有编译能力 而 VB.Net是为适应.Net框架而由VB改造的是编译语言 两者有本质区别 不能混用 ！！
不用转换吧，直接新建一个Sub把代码放进去就行了，用的时候调用就行：
Sub VBSSub()
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("Tee1")
oProject.SaveAs "D:\Ansoft\Tee2.hfss", true
Set oDesign = oProject.SetActiveDesign("HFSSDesign1")
oDesign.SetSolutionType "DrivenModal"
Set oEditor = oDesign.SetActiveEditor("3D Modeler")
oEditor.SetModelUnits Array("NAME:Units Parameter", "Units:=", "in", "Rescale:=", _
false)
oEditor.CreateBox Array("NAME:BoxParameters", "CoordinateSystemID:=", -1, "XPosition:=", _
"0in", "YPosition:=", "0in", "ZPosition:=", "0in", "XSize:=", "2in", "YSize:=", _
"0.9in", "ZSize:=", "0.4in"), Array("NAME:Attributes", "Name:=", "Box1", "Flags:=", _
"", "Color:=", "(132 132 193)", "Transparency:=", 0, "PartCoordinateSystem:=", _
"Global", "MaterialName:=", "vacuum", "SolveInside:=", true)
End Sub
dim sockf=CreateObject("MSWinsock.Winsock","sockp_")
Sub sockp_DataArrival(ByVal bytesTotal)
sockf.GetData( da,VbString)
End Sub
”VBS脚本“可以用任何纯
文本编辑
工具编写，包括系统自带的”记事本“。VB.NET当然也可以。
如果你是需要语法提示之类的，VB.NET可以提供绝大部分的语法提示。毕竟
VBS
是
VB
的子集。
一般的VBS程序都是可以写在VB程序里面的 只需要稍加变化 加上些关键字 或者数据类型
如果 你想调用一个VBS程序 也可以使用Shell的方法