int OpenTSAP(char *serverID,char *loginID,char *passwd,char *errmsg)
若成功,返回1,若失败,返回0,并且在errmsg里写上具体错误信息。errmsg由VB提供的字符串缓存区,空间应该在100个字节以上。
若成功,返回1,若失败,返回0,并且在errmsg里写上具体错误信息。errmsg由VB提供的字符串缓存区,空间应该在100个字节以上。
解决方案 »
- 因为msgbox弹出的窗体太小太低调了,征求很大很显眼的弹出窗体方法~~~
- 数据库更新速度
- 数据报问题,高手进,急
- 如何把关掉的控件再开起来?
- 请问SPI_SETSCREENSAVERRUNNING,SPIF_UPDATEINIFILE的值是多少?还有如何屏蔽系统热键(Win+E,Win等)?
- 请问:如何获得网络上网卡的Mac
- 用什么API函数可以杀进程?
- 用ado控件编写数据库管理程序,数据库为.mdb格式,如何实现数据库文件链接与程序路径无关。在线等,多谢!
- bardo 您的qq是多少?吐血恳求!!
- 请问Winsock高手.......在VB中怎样用setsockopt呢?
- 问
- 请问大哥们:showhtmldialog函数的用法.或者声明?(实时在线)
ByRef serverID As Byte, ByRef loginID As Byte, ByRef password As Byte, _
ByRef errmsg As Byte) As Integer
这样可以吗?
ByRef serverID As Byte, ByRef loginID As Byte, ByRef password As Byte, _
ByRef errmsg As Byte) As Integer
这样可以吗?你之样调用dim sServerID AS string
dim sLoginID AS string
dim sPassword AS string
dim sErrMsg AS stringdim iResult as integersServerID =space(100)
sLoginID =space(100)
sPassword =space(100)
sErrMsg =space(100)iResult =OpenTSAPI(sServerID ,sLoginID ,sPassword ,sErrMsg )调用之前一定要给字符分配一定的空间,因为是按地址调用...
space(100)你可以根据你的DLL里面的来定
Function OpenTSAP(Byval serverID As String,Byval loginID As String,Byval passwd As String,Byval errmsg As String) As Long
楼上的两三颗星的,可不要误导他人哦。另rainstormmaster(暴风雨 v2.0) :Strptr函数取得字符串的地址不如Byval来的保险。
ByVal serverID As String, ByVal byvalloginID As String, ByVal password As String, _
ByVal errmsg As String) As Long
Dim a as long
Dim strerr As String
Dim serverID As String
Dim logid As String
Dim passw As Stringa = OpenTSAPI(serverID, logid, passw, strerr)运行后提示:DLL调用约定错误,错误号:49
如果你有dll的源代码,可以改就好办了
int _stdcall OpenTSAP(char *serverID,char *loginID,char *passwd,char *errmsg)如果没有源代码,那就等高人来用 VB 给平衡堆栈吧,我也爱莫能助。而且你的楼上的楼上的代码也有点问题,加一句
strerr=space(100)'分配空间
在使用时,可以参考使用CopyMemory函数的方法,有一点应该是可以肯定的,这参数是按值(Byval)传递,而绝非按地址传递。这似乎不是一两句可以给出单一答案的问题,网上关于copymemort函数使用的介绍非常多,你可以参考一下。