我收集了很多代码,都是一个一个的TXT或者HTML文件,有没有好用的,代码管理器,可以管理这些代码或者技巧

解决方案 »

  1.   

    把工具发到我EMAIL上:[email protected] 
    先谢了
      

  2.   

    建立一个ACCESS数据库来处理你的那些代码和HTML文件,以下是我自己做的类似用途的代码,供参考。
    Private Sub Command1_Click()
    Adodc1.Recordset.AddNew
    End SubPrivate Sub Command2_Click()
    Adodc1.Recordset.Update
    Adodc2.Recordset.Update
    DataList1.Refresh
    End SubPrivate Sub DataList1_Click()
        Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\IASK.mdb;Persist Security Info=False"
        Adodc1.RecordSource = "select * from iask where 问题 ='" & Trim(DataList1) & "'"
        Adodc1.Refresh
        'Set Form1.DataGrid1.DataSource = Adodc1
        'Set Form1.Text1.DataSource = Adodc1
        'Form1.Show
    End SubPrivate Sub Form_Load()
    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\IASK.mdb;Persist Security Info=False"
    Adodc1.RecordSource = "select * from iask order by 问题" ' where 问题 ='" & Trim(DataList1) & "'"
    Adodc1.Refresh
    Adodc2.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\IASK.mdb;Persist Security Info=False"
    Adodc2.RecordSource = "select * from iask order by 问题"
    Adodc2.Refresh
    Text4 = Adodc2.Recordset(1)
    End SubPrivate Sub Text4_Change()
    Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:\IASK.mdb;Persist Security Info=False"
    Adodc1.RecordSource = "select * from iask where 问题 like'" & Text4 & "%'"
    Adodc1.Refresh
    End Sub
      

  3.   

    没有收到,其实我不想用这样的工具,有没有更方便的比如像MYBASE那样的东东