下载地址:
下载地址1(本站为飞网专业下载站,域名:down.cfei.net)
资源简介:
'//ACCESS合成数据Private Sub Command14_Click() '导入男生体育成绩On Error Resume NextDim strfilename As StringDim myCat As New ADOX.CatalogDim strsql As StringDim mytable As String '指定外部数据库 strfilename = GetFileName("选择mdb文件", "*.mdb", "mdb") Me.MYBOOKPATH = strfilename mytable = "studs" '指定外部库中数据表strsql = "INSERT INTO 体育"strsql = strsql + " SELECT * "strsql = strsql + " FROM " & mytable & " in '" & strfilenamestrsql = strsql + "' WHERE sex='男';"Me.Text11 = strsql'将指定外部库中指定表中的数据追加到 [体育] 表中DoCmd.RunS
飞网下载站,免费下载共享资料,内容涉及教育资源、专业资料、IT资源、娱乐生活、经济管理、办公文书、游戏资料等。