直接生成shell对象,调用对应的exe程序并传参(exe程序的话,得自己写了。),参数少时,直接追加,参数过多时,用文件传参,省力省时。
下面为lightswitch调用exe对:
Dim shell = AutomationFactory.CreateObject("Shell.Application")
shell.shellexecute("D:\\ftp.exe", "-http -dghtd")
下面为ftp.exe程序样例(在这里我做的是windows控制台程序,并在属性里把应用程序类型改成为 windows 服务,只在后台运行,不显示界面):
以下程序只是测试用,ftp的教程vb.net的网上很多,这里只是为解决lightswitch在功能上的不足,所以就不写了
Dim cmdd As String = "-ht" '查找参数中包含字符
Dim cmds As String = "" '得到参数中指定字符
For Each s As String In My.Application.CommandLineArgs '在传入参数中查找指定字符
If s.ToLower.Contains(cmdd) Then
MsgBox("sff")
cmds = s.Remove(0, cmdd.Length)
End If
Next
If cmds = "" Then
MsgBox("是空的")
Else
MsgBox(cmds)
End If