请教高手，给一个VB导入导出SQL数据库中数据的例子？

Question

请教高手，给一个VB导入导出SQL数据库中数据的例子？
按照条件查询的结果生成上报文件，或者读取文件，以何种格式保存都可以，拜托了， 本人基础不好，谢谢各位大虾

Answer 1

http://blog.csdn.net/jhkdiy/archive/2009/06/19/4284135.aspx

Answer 2

Dim myConn As ADODB.Connection
Dim myRec As ADODB.RecordsetPrivate Sub Form_Load()
Dim ConnStr As String
Dim mySQL As String
Dim i As Integer
    Set myConn = New ADODB.Connection
    
    ConnStr = "Provider=SQLOLEDB.1;Integrated Security=SSPI;"
    ConnStr = ConnStr + "Persist Security Info=False;Initial Catalog=LYB;Data Source=pc106\test"    
    myConn.ConnectionString = ConnStr
    
    myConn.Open  '打开Connection连接
        Set myRec = New ADODB.Recordset
    
    mySQL = "select * from qcbosedata"
    
    myRec.Open mySQL, myConn, 1, 3
    
    For i = 0 To myRec.Fields.Count - 1  '先显示所有的列名
        Label1(i).Caption = myRec.Fields(i).Name
    Next
    
    '显示字段值
    Text1.Text = myRec(0).Value
    Text2.Text = myRec(1).ValueEnd Sub