s7-200 prodave 通讯

硬件：一台pc机，无CP5611一类的卡
           编程线缆PC adapter USB(进口)，PC/PPI
           CPU224 （6ES7 214-1BD23 0XB0）,无扩展模块
实现：VB编写上位机程序（已附于问题后面），调用prodave V5.6  W95_s7.dll

条件：1、PC/PG设定Local地址为0，搜索到的CPU224地址为1
            2、波特率设定为9.6Kbps
            3、PC adapter USB(进口)，PC/PPI两种连接均尝试过
问题：上述实验条件下
             Res = load_tool(1, "S7ONLINE", plcadr) ''S7ONLINE Micro/WIN
             返回的Res的值总是0X320,，查手册错误代码的含义是hardware error

求解：上述问题的原因以及解决的办法。

ps. 
      QQ:499051120
      Email:311gip@163.com

/*声明部分*/
Public plcadr As plcadrtype
Public gb_PlcConnected As Boolean
Type plcadrtype
     ADR As Byte
     SEGMENTID As Byte
     SLOTNO As Byte
     RACKNO As Byte
End Type
Public Res As Long
Public Declare Function as200_e_field_read Lib "w95_s7.dll" (ByVal nr As Long, ByVal anz As Long, value As Byte) As Long 
Public Declare Function as200_a_field_write Lib "w95_s7.dll" (ByVal nr As Long, ByVal anz As Long, value As Byte) As Long
Public Declare Function as200_vs_field_read Lib "w95_s7.dll" (ByVal nr As Long, ByVal anz As Long, value As Byte) As Long 
Public Declare Function load_tool Lib "w95_s7.dll" (ByVal nr As Byte, ByVal dev As String, ADR As plcadrtype) As Long
Public Declare Function unload_tool Lib "w95_s7.dll" () As Long

/*窗体部分*/
Private Sub Test_Click()
Dim buffer(1) As Byte
    plcadr.ADR = 1
    plcadr.SEGMENTID = 0
    plcadr.SLOTNO = 1
    plcadr.RACKNO = 0
    Res = load_tool(1, "S7ONLINE", plcadr) ''S7ONLINE Micro/WIN
    If Res <> 0 Then
        MsgBox ("PLC连接错误")
       gb_PlcConnected = False
    Else
        gb_PlcConnected = True
        MsgBox ("plc连接正确")
        Test.Caption = buffer(0)
    End If
    Res = unload_tool()
End Sub
//---------------------------------------------------------------------------------------------------------