数据库菜鸟 VB6程序查询数据库
大家好，感谢邀请，今天来为大家分享一下数据库菜鸟的问题，以及和VB6程序查询数据库的一些困惑，大家要是还不太明白的话，也没有关系，因为接下来将为大家分享，希望可以帮助到大家，解决大家的问题，下面就开始吧！
ODBC数据库是什么
ODBC是微软公司开放服务结构(WOSA，Windows Open Services Architecture)中有关数据库的一个组成部分，它建立了一组规范，并提供了一组对数据库访问的标准API（应用程序编程接口）。这些API利用SQL来完成其大部分任务。
ODBC本身也提供了对SQL语言的支持，用户可以直接将SQL语句送给ODBC。一组数据的位置，可以使用 ODBC驱动程序访问该位置。
一个完整的ODBC由下列几个部件组成：
1、应用程序(Application)。
2、ODBC管理器(Administrator)。该程序位于Windows控制面板(Control Panel)的管理工具内，其主要任务是管理安装的ODBC驱动程序和管理数据源。
3、驱动程序管理器(Driver Manager)。驱动程序管理器包含在ODBC32.DLL中，对用户是透明的。其任务是管理ODBC驱动程序，是ODBC中最重要的部件。
4、ODBC API。
5、ODBC驱动程序。是一些DLL，提供了ODBC和数据库之间的接口。
6、数据源。数据源包含了数据库位置和数据库类型等信息，实际上是一种数据连接的抽象。
PHP MySQL 创建数据库和表 菜鸟问题
1,die的作用是你所想的那样，输出里面的内容，并结束程序。
2，'create database my_db'，这仅仅是一个语句，如果需要执行才能产生效果的，所以需要mysql_query()。就好比，你有一碗米，是需要煮了之后才能吃的~~
3,如果没有其他的数据库连接，这个$con是可以不需要的。如果你可能需要操作多个数据库的时候，或者已不同身份使用数据库的时候这个就是必须的了。
比如
$con= mysql_connect("localhost","peter","abc123");
$con2= mysql_connect("localhost","peter2","abc456");
这两个用户peter,peter2是两个不一样的用户---假设peter2没有创建数据库的权限，那么mysql_query("create database my_db",$con2)。就会出错。
再举个例子。
$con= mysql_connect("localhost","peter","abc123");
$con2= mysql_connect("localhost2","peter","abc123");
当你执行mysql_query(“SQL语句”,$con)
mysql_query(“SQL语句”,$con2)
他们产生结果的数据库服务器，就不一样了。
PHP初学者吧。多多加油！
欢迎到http://www.webcook.cn/thread.php?fid-11.html
提问~
我不是经常在百度~
VB6程序查询数据库
既然是多方式模糊查询，那么必须具备几个条件：
1、首先有查询方式的选择框，还有查询需要的关键字的输入框；
2、模糊查询结果不是一条记录，那么必须将查询出的所有结果在列表框控件中显示出来；
3、点击列表框中的一条记录，在文本框中显示这条记录的详细内容。
我比较喜欢用MSFlexGrid控件显示查询结果，下面给你一个比较实用的范例：
Private Sub Command1_Click()'查询
If Combo1.Text="" Then
MsgBox"你没有选择查询方式，请选择！", 16,"错误！"
Exit Sub
End If
If Text1.Text="" Then
MsgBox"你没有填写关键字，请填写！", 16,"错误！"
Exit Sub
End If
If Combo1.Text="查询条件1" Then
strSQL="Select* From数据表名字段名1 Like'%"& Text1.Text&"%'"
ElseIf Combo1.Text="查询条件2" Then
strSQL="Select* From数据表名 Where字段名2 Like'%"& Text1.Text&"%'"
ElseIf Combo1.Text="查询条件3" Then
strSQL="Select* From数据表名 Where字段名3 Like'%"& Text1.Text&"%'"
End If
Call SJK(db)'数据库连接函数
RS.Open strSQL, db, 2, 2
Do While Not RS.EOF
SST= SST+ 1
RS.MoveNext
Loop
RS.Close
Set RS= Nothing
If SST= 0 Then
MsgBox"你没有你查询的记录！", 16,"无记录！"
With MSFlexGrid1
.Cols= 3
.Rows= 1
.TextMatrix(0, 0)="序号"
.TextMatrix(0, 1)="姓名"
.ColWidth(0)= 1000
.ColWidth(1)= 1000
.ColWidth(2)= 0
End With
db.Close
Set db= Nothing
Exit Sub
End If
With MSFlexGrid1
.Cols= 3
.Rows= SST+ 1
.TextMatrix(0, 0)="序号"
.TextMatrix(0, 1)="姓名"
.ColWidth(0)= 1000
.ColWidth(1)= 1000
.ColWidth(2)= 0
RS.Open strSQL, db, 2, 2
For I= 1 To SST
.TextMatrix(I, 0)= I
.TextMatrix(I, 1)= RS!姓名
If Option1(0).Value= True Then
.TextMatrix(I, 2)= RS!SID
ElseIf Option1(1).Value= True Then
.TextMatrix(I, 2)= RS!SID
ElseIf Option1(2).Value= True Then
.TextMatrix(I, 2)= RS!SID
ElseIf Option1(3).Value= True Then
.TextMatrix(I, 2)= RS!ZID
ElseIf Option1(4).Value= True Then
.TextMatrix(I, 2)= RS!SID
End If
RS.MoveNext
Next I
RS.Close
Set RS= Nothing
End With
db.Close
Set db= Nothing
Label1(2).Caption="本次查询结果"& SST&"条"
End Sub
Private Sub MSFlexGrid1_Click()
If Not Val(Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 2)))= 0 Then
PKID= Val(Trim(MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 2)))
Call SJK(db)
strSQL="select* from数据表名 Where ID="& PKID&" Order By ID"
RS.Open strSQL, db, 3, 3
Text2(0).Text= RS!字段1
Text2(1).Text= RS!字段2
Text2(2).Text= RS!字段3
Text2(3).Text= RS!字段4
Text2(4).Text= RS!字段5
Text2(5).Text= RS!字段6
Text2(6).Text= RS!字段7
Text2(7).Text= RS!字段8
RS.Close
Set RS= Nothing
db.Close
Set db= Nothing
End If
End Sub
关于本次数据库菜鸟和VB6程序查询数据库的问题分享到这里就结束了，如果解决了您的问题，我们非常高兴。