acsse数据库连接错误

<%on error resume next

dim conn,db

dim connstr

db="name.mdb" '数据库文件位置

on error resume next

connstr="DBQ="+server.mappath(""&db&"")+"DefaultDir=DRIVER={Microsoft Access Driver (*.mdb)}"

set conn=server.createobject("ADODB.CONNECTION")

if err then

err.clear

else

conn.open connstr

end if

%>

串口接收地BYTE数据转为16进制，注意0-9前需补0，变为00-09。统一组成2字节组成的16进制字符串，便于以后的数据处理。

Private Sub Form_Load()

MSComm2.CommPort = 2

MSComm2.InBufferSize = 1024

MSComm2.OutBufferSize = 512

MSComm2.Settings = "9600,n,8,1"

MSComm2.RThreshold = 1

MSComm2.InputMode = comInputModeBinary '二进制接收

MSComm2.PortOpen = True

Text1 = ""

End Sub

Private Sub MsComm2_OnComm()

Dim intInputLen As Integer

Select Case Me.MSComm2.CommEvent

Case comEvReceive

'处理接收的代码

intInputLen = Me.MSComm1.InBufferCount

ReDim bytInput(intInputLen)

bytInput = Me.MSComm2.Input

jieshou

End If

End Select

End Sub

Public Function jieshou() '接收数据处理为16进制

Dim i As Integer

For i = 0 To UBound(bytInput)

If Len(Hex(bytInput(i))) = 1 Then

strData = strData &"0" &Hex(bytInput(i))

Else

strData = strData &Hex(bytInput(i))

End If

Next

Text1 = strData

End Function

分段存入acssess数据库需依据通信协议按要求取数据。

您说的这数据库不知道是哪个师妈告诉你的这么写，我还真的没有见到过。

了解的有一个数据库叫：access ，这个数据库是微软office自带的数据库，在office2003 的优化版中默认是不安装这个程序的。

access数据库跟其他数据库没啥大的区别，只是使用环境不一样。

个人认为他比较适用的情况：

1、数据库的临时中转，比如软件与软件之间的数据接口。

2、小型web网站。

3、个人记事本类的小数据存储型软件。

access的优点就是安装简单，轻便。

缺点：不适宜数据量较大的数据库。 后期的数据库优化不方便。

---