大流量网站tag标签:dll调用出错了(453错误)!!高手呀!我急了好久了!!

来源:百度文库 编辑:杭州交通信息网 时间:2024/05/01 02:41:58
有一个硬件的dll,开发了一个程序(光标阅读机的程序),但是程序老是报453找不到程序入口,
代码如下:(vb6+win98)
Private Declare Function omrs Lib "Omrclien.dll" (ByVal buffer As String) As String
Private Declare Function omrg Lib "Omrclien.dll" (ByVal buffer As String) As String
Private Declare Function tmomrgetstatu Lib "Omrclien.dll" (ByVal buffer As String) As String
Private Declare Function tmomrgetvalue Lib "Omrclien.dll" (ByVal buffer As String) As String
Private Sub Command1_Click()
Dim buf, v
buf = "S " & App.Path & "\1001.txt/"
MsgBox (buf)
omrs (buf)
buf = "/"
omrg (buf)
If Left(Trim(tim), 2) = "OK" Then
buf = "001" + Space(120) + "/"
omrs (buf)
omrg (buf)
tmomrgetstatu (buf)
If Left(Trim(buf), 2) = "OK" Then
tmomrgetvalue (buf)
End If
Else
If buf <> "16" Then
MsgBox "err--" + buf
End If
End If
End Sub
说明:buf = "S " & App.Path & "\1001.txt/" 是把一个格式文件,不知道这里有没有错,这个代码和说明书上面的不同(说明书是 buf="s \1001.txt"),
高手能不能说一下麻—— 好久都不能解决哦!!

找个软件 分析一下Omrclien.dll 的导出函数。
函数名有可能带前后缀的,需要用Alias 指定

至于buf,好像是有问题。但不会造出这样的出错。