1、请问如何实现榆数据库的动态炼结?
2、请问如何查询一个表?
3、请问作数据库的开发是不是药用activex 的控件?

解决方案 »

  1.   

    1.把连接字符串用变量表示就可以.
    2.select * from tblname
    3.不一定要用.
      

  2.   

    用DAO即可實現數據庫訪問。
    主要有以下類:CDatabase、CRecord
      

  3.   

    With DBConnect
         .Provider = "Microsoft.Jet.OLEDB.4.0"
         .Properties("Data Source").value = App.Path & "\data.mdb"
         .Properties("Persist Security Info").value = True
         .Properties("Jet OLEDB:Database Password").value = "pass"
         .CommandTimeout = 30
    End With
        '定义对象
        
        Set DBRecordset = New ADODB.Recordset
        
        With DBRecordset
            '初始化一些属性
            .CursorLocation = adUseClient
            .LockType = adLockOptimistic
            .CursorType = adOpenStatic
            Set .ActiveConnection = cn
            .Source = "select * from t_records where id=" & lRecordID
            '打开数据集
            .Open
            If .EOF And .BOF Then
                .AddNew
            End If
            .Fields!Title = LeftEx(Trim(txttitle.Text), 200)
            .Fields!RecordType = lRecordType
            .Fields!RType = Val(fraType.Tag)
            '更新数据
            .Update
            '关闭数据集
            .Close
        End With
      

  4.   

    我看错地方了,是VB.
    不过我想VC也差不多吧.
      

  5.   

    #import "c:\program files\common files\system\ado\msado21.tlb" no_namespace rename ("EOF", "adoEOF") _ConnectionPtr pConn = NULL;
    _CommandPtr pCmd = NULL;
    _RecordsetPtr pRs = NULL;

    HRESULT hResult = E_FAIL; _bstr_t bstrConn = _bstr_t(L"DSN=AccessDb;");
    _bstr_t bstrSQL = _bstr_t(L"SELECT t_Folder.* FROM t_Folder"); // _ConnectionPtr
    hResult = pConn.CreateInstance(__uuidof(Connection));
    if (FAILED(hResult)) {
    AfxMessageBox("pConn.CreateInstance");
    return;
    }
    pConn->CursorLocation = adUseClient;
    pConn->ConnectionString = bstrConn;
    pConn->Open(_bstr_t(L""), _bstr_t(L""), _bstr_t(L""), -1); // _CommandPtr
    hResult = pCmd.CreateInstance(__uuidof(Command));
    if (FAILED(hResult)) {
    AfxMessageBox("pCmd.CreateInstance");
    return;
    }
    pCmd->ActiveConnection = pConn;
    pCmd->CommandText = bstrSQL;
    pCmd->CommandType = adCmdText; // _RecordsetPtr
    hResult = pRs.CreateInstance(__uuidof(Recordset));
    if (FAILED(hResult)) {
    AfxMessageBox("pRs.CreateInstance");
    return;
    }
    pRs->Open((_Command*)pCmd, vtMissing, adOpenForwardOnly, adLockOptimistic, adCmdText);
    if (pRs->Supports(adAddNew) && pRs->Supports(adUpdate)) {
    pRs->AddNew();
    pRs->PutCollect(L"fName", L"fName");
    pRs->PutCollect(L"fParent", _variant_t(11L));
    pRs->Update();
    }
      

  6.   

    牛人:
       你最上边的那句话市不是引用的delphi的tlb文件?
    import 在vc中是什么意思?请执教
      

  7.   

    msado21.tlb不是delphi的,是ADO的一个动态库,都可以使用的.