最近准备用vb写一个和300通讯的小程序,用prodave.dll提供的函数。测试连接没有问题,不过在读的时候一直出错,vb断点监控返回值是 53825,不知道有门有熟悉prodave的朋友帮忙看一下。
下面数读的程序
Dim MySet As Long
Dim pReadBuffer(1024) As Byte
Dim pDatLen As Long
Dim MyHex As String
DatType = 6
blknr = 100
StartNr = 0
Amount = 10
BufLen = 1024
MySet = SetActiveConnection_ex6(1)
MyHex = db_read_ex6(blknr, DatType, StartNr, Amount, BufLen, pReadBuffer(0), pDatLen)
我想从DB100.DBD0开始读10个Dint,不知道这么写有没有错误?
问题已经解决了,原因是我用的是F型的CPU,在读取数据之前需要先写入密码。增加一个SetPassword的函数即可。