这东西源代码没啥用,一个程序一个样,你想要我给你个我写的程序代码看看
但是最好是看书上的例子,掌握SQL语言,也不是很难,有看源码的时间都学会了

解决方案 »

  1.   

    strSQL = "delete from frequency"
    Set RS = CN.Execute(strSQL)
      

  2.   

    http://www.vbeden.com/bar_on_top.html
    http://www.applevb.com/mysoft.htm
      

  3.   

    入不嫌弃,Look:
    Dim cnn1 As ADODB.Connection
      Dim rstSchema As ADODB.Recordset
      Dim strCnn As String
          
      Set cnn1 = New ADODB.Connection
          strCnn = "Provider=sqloledb;" & _
          "Data Source=dev-mail;Initial Catalog=e3v30;User Id=e3user;Password=8626253217; "
      cnn1.Open strCnn
          
      Set rstSchema = cnn1.OpenSchema(adSchemaTables)
      
      Do Until rstSchema.EOF
          Debug.Print "Table name: " & _
            rstSchema!TABLE_NAME & vbCr & _
            "Table type: " & rstSchema!TABLE_TYPE & vbCr
          rstSchema.MoveNext
      Loop
      rstSchema.Close
      
      cnn1.Close
      

  4.   

    www.vbeden.com 上我下载过但不能用