如何用ADO将ACCESS生成Foxbase+的dbase文件? 做一个连接到ACCESS,再做一个到DBASE,然后一条数据一条数据倒。 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 如果我想先生成dbase文件呢?(因为文件名后六个字符是日期,要动态生成) dim cnn as adodb.connectionopnFilePath = opnFilePath + "\" + opnFileName + "_" + "DB4"If Dir(opnFilePath, vbDirectory) = "" Then MkDir opnFilePathSet cnn = new adodb.connectioncnn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data......"'******************************************************************strTempStr = "SELECT * INTO [dBASE IV;DATABASE=" + _opnFilePath + "].[" + tableName + "]" + " FROM [" + tableName + "]"'******************************************************************cnn.Execute strTempStrcnn.Closeset cnn = nothing 用dbase IV则中文成了乱码,如何解决,急切等待中? 如何用VB控制扫描仪去扫描图片?? com+的web 服务 关于vb6安装包的问题,2000,xp下非系统管理员如何安装? VB与Word帮助! 怎样才能将Label控件放在其它控件上面? vb有没有位操作?比如异或 Trim 与Trim$ 有什么不同吗? SHAddToRecentDocs函数的用法? 请问如何用vb进行数据库的备份 很简单的问题,请指点一下! 哪个API可以播放MP3? ※※※※◎◎◎◎取得整个页面数据的方法--求助!!%◎◎◎◎※※※※
(因为文件名后六个字符是日期,要动态生成)
opnFilePath = opnFilePath + "\" + opnFileName + "_" + "DB4"
If Dir(opnFilePath, vbDirectory) = "" Then MkDir opnFilePath
Set cnn = new adodb.connection
cnn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data......"
'******************************************************************
strTempStr = "SELECT * INTO [dBASE IV;DATABASE=" + _
opnFilePath + "].[" + tableName + "]" + " FROM [" + tableName + "]"
'******************************************************************
cnn.Execute strTempStr
cnn.Close
set cnn = nothing