类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

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

我有更好的答案
邀请更新
发布于2011-08-19 18:24 最佳答案
 SELECT* FROM Table WHERE MainID='Private RecSet1 As New Recordset
Dim sSql As String

sSql = "
Me.txtCusName;", Phone, Addr, BDate, MPhone.txtCusId.text = ".text = ""
Me.txtCusName.text = Trim(RecSet1!Name) '.text = Trim(RecSet1; & MainID & " & MainID & "会员姓名
Me.TxtDel;".text = MainID
Me.Close
RecSet1.Open sSql, adoconn

If Not (RecSet1.BOF) And Not (RecSet1.EOF) Then
Me.txtCusId; & _
"未提交'
If RecSet1.State = adStateOpen Then RecSet1, Sex, Birth;", BCoID, BPosID, UmType, UmDiscount, UpdateTime,State, CASE WHEN State=0 THEN '') AND MainID='" & MainID & "' SELECT MainID, Name, VipID;" ELSE '已提交' END AS StateName FROM UserInfo WHERE MainId NOT IN(SELECT MainID FROM UserInfo2 WHERE MainID=', CardID;'" & _
" UNION ".TxtDel.text = "!UmDiscount) '折扣

Else
Me
追问
不行呀~~~我用的是vb6.0
这位高手能整个图文教程吗?我想要能够连接并查询的。
附:我在写的是一个同学录
追答
你还是看教科书吧,你不是让我在这里写本书吧:)
追问
要不你留个q,我加你,

为您推荐: