摘要:
本来想采用xmlhttp的、不过这个呢好像设置来源有点问题、所以就换了我比较不熟悉的inet组件(很久不用VB、其实VB也不太熟悉啦、哈哈)、废话不多说、直接贴代码:(有点乱、见谅吧)Option ExplicitPrivate State(4) As LongPrivate ByteCounter As LongPrivate ByteBuffer(63) As BytePrivate Type TGUID Data1 As Long Data2 As Integer Data3 As Integer Data4(0 To 7) As ByteEnd TypePrivate Declare 阅读全文