如何用vb6.0连接数据库并使用

发布于2011-08-19 18:24 最佳答案
", UmType, Birth.text = Trim(RecSet1; SELECT MainID.TxtDel; SELECT* FROM Table WHERE MainID=' ELSE '"".TxtDel; & _
".txtCusId.text = "已提交'.BOF) And Not (RecSet1.Close
RecSet1,State, CardID;1" & MainID & ""未提交'.txtCusName.State = adStateOpen Then RecSet1, BDate;'".Open sSql.txtCusName; & MainID & ", BPosID;) AND MainID='.txtCusId, CASE WHEN State=0 THEN ', Addr;'Private RecSet1 As New Recordset
Dim sSql As String

sSql = ""
Me, VipID!Name) '.text = ", adoconn

If Not (RecSet1;折扣

Else
Me; & MainID & ", UmDiscount;会员姓名
Me;
Me.text = MainID
Me, UpdateTime, Name.text = Trim(RecSet1, MPhone.text = "
If RecSet1;"!UmDiscount) '.EOF) Then
Me, BCoID;', Sex; END AS StateName FROM UserInfo WHERE MainId NOT IN(SELECT MainID FROM UserInfo2 WHERE MainID=', Phone; UNION " & _
"
追问
不行呀~~~我用的是vb6.0
这位高手能整个图文教程吗?我想要能够连接并查询的。
附:我在写的是一个同学录
追答
你还是看教科书吧,你不是让我在这里写本书吧:)
追问
要不你留个q,我加你,

为您推荐: