
首先链接数据库 dataaccess = server.mappath("data/xxxx.mdb") '连接OLEDB Set oConn = Server.CreateObject("ADODB.CONNECTION") oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0Data Source=" &dataaccess 其次打开表并
读取记录 sql = "sele在
窗体上添加如下控件各1个: DriveListBox --- 驱动器
列表 DirListBox ---- 文件夹列表 FileListBox ---- 文件列表 TextBox ---- 文本框 CommandButton ---- 命令按钮 完整代码如下: Option Explicit Private Sub Command1_Click() Unload Me
评论列表(0条)