求助高手TChart连接数据库问题

Dim conn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim connstr As String
Dim sql As String

Private Sub form_load()

connstr = "driver={microsoft access driver (*.mdb)};dbq=" & App.Path & "\Ex.mdb"
conn.Open connstr
sql = "select * from aaa"
rs.Open sql, conn, adOpenKeyset, adLockPessimistic

With TChart1
TChart1.AddSeries (scLine)

.Series(0).Clear

Axis = .Axis.AddCustom(False)
.Axis.Custom(Axis).StartPosition = 0
.Axis.Custom(Axis).EndPosition = 100
.Axis.Custom(Axis).AxisPen.Color = vbRed
.Axis.Custom(Axis).Labels.Font.Color = vbRed
.Series(0).VerticalAxisCustom = Axis
.Axis.Custom(Axis).Maximum = 1500
.Axis.Custom(Axis).Minimum = 0
Randomize
Set TChart1.Series(0).DataSource = rs
TChart1.Ser

求助高手TChart连接数据库问题 求助高手帮忙建立数据库与网站的连接 求助，.net2005无法连接数据库? sql连接java数据库 求助 连接两个数据库，高手请进`` 连接两个数据库，高手请进 用asp做网站时连接数据库出现这个问题,急求助高手? 求助高手！！Oracle数据库在dos里用system连接时报错？ 求助：asp连接数据库的问题 求助:JAVA连接ACCESS数据库原代码