调用API的问题!

[wumylove1234]

'''''''''''''''''''''调用部分''''''''''''''''''''''''''''''''''''''''
Dim stru As mdlGlobal.SHELLEXECUTEINFO


stru.cbSize = Len(stru)
stru.fMask = 0
stru.hwnd = Me.hwnd
stru.lpVerb = vbNullString

stru.lpFile = strAppMgr
stru.lpDirectory = vbNullString
stru.nShow = SW_SHOWDEFAULT
stru.hInstApp = App.hInstance

stru.lpParameters = App.Path & "\" & files
If ShellExecuteEx(stru) = ERROR_SUCCESS Then

'''''''''''''''''''''声明''''''''''''''''''''''''''''''''''''''''''
Public Type SHELLEXECUTEINFO
cbSize As Long
' fields
lpIDList As Long
lpClass As String
hkeyClass As Long
dwHotKey As Long
hIcon As Long
hProcess As Long
lpParameters As String
lpDirectory As String
nShow As Long
hInstApp As Long
lpVerb As String
lpFile As String
hwnd As Long
fMask As Long

End Type

Public Const SW_SHOWDEFAULT = 10
Public Declare Function ShellExecuteEx Lib "shell32.dll" (lpExecInfo As SHELLEXECUTEINFO) As Long

调用外部程序的API,报内存冲突,我查了半天也查不到原因.哪位帮忙看看,万谢.
其中:
strAppMgr=C:\Program Files\Microsoft ActiveSync\CEAPPMGR.EXE
stru.lpParameters=E:\SetupCAB\Setup-0.ini

[笨笨兔兔兔兔兔]

帮你顶吧。。。。实在没时间了。。。进度完不了了

[奋斗一生的程序员]

顶！

[射天狼]

时间比较紧，要过节了～～～～～

不知道你要实现什么功能，换种思路想想。

═══════════════════
　免费的源码、工具网站，欢迎大家访问！
　http://www.j2soft.cn/
═══════════════════