请教,关于这段代码,有空格怎么办? 本帖最后由 lzxbl04 于 2010-01-19 11:16:51 编辑 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 你在使用Access的时候,将取出的数据用Trim函数去空格吧。因为你的导入不是自己手工写的,是使用的自动的方法。 先用Trim将空格处理完后再导入 有两个方法:①在导入之后,从 Access 取数据时处理。②在导入之前,先对 Excel文档 进行处理。 他是叫你在取Access数据时再处理。否则你不可以用以下方式导入:Set db = OpenDatabase(excelPath, True, False, "Excel 8.0;IMEX=1") sql = ("Select * into [;database=" & accessPath & "]." & accessTable & " from [" & sheet & "$]") db.Execute (sql) 第②中最好了,就像3楼大哥说的,但我只找到在Excel中用VBA做的代码 可以在导入之后,对 Access 中的数据用 UPDATE 语句进行去除空格的更新。 为什么?难道就不能在导入之前加一段代码,该段代码的功能是:读Excel → 去空格 → 将改好的数据写入原来的Excel能不能这样实现只是小弟的无畏构想,呵呵,汗一个 预先去空格应该不如事后在数据库中update快 小弟自己写了一个,不知道行不行,假设要将第一列的数据去空格For n = 0 To rs.RecordCountrs.Fields(0).Value = trim(rs.Fields(0).Value)next nrs.Update 帮忙改改这个UpdateFor n = 0 To rs.RecordCount rs.Fields(0).Value = trim(rs.Fields(0).Value) next n rs.Update For n = 0 To rs.RecordCount rs.Fields(0).Value = trim(rs.Fields(0).Value) rs.Updaters.movenextnext n 上传后,对文本进行批量替换,再新建文本,提示无权限。 调用可执行程序的问题 最大流水号怎么算!谢谢了` 怎样将文本文件或是excel文件写入数据库,! ■■■■■■■■■■■■■■■登陆后打开软件的问题■■■■■■■■■■■■■■■ 网上有没有什么好点的VB教程?希望大家推荐! 关于recordset.find问题 请教VB数据库的问题 文本框不能保存? 一个sql中的insert问题 recordset两种方法的不同 VB如何实现类似 点击QQ好友列表中相应的好友打开相应的对话窗口
因为你的导入不是自己手工写的,是使用的自动的方法。
①在导入之后,从 Access 取数据时处理。
②在导入之前,先对 Excel文档 进行处理。
Set db = OpenDatabase(excelPath, True, False, "Excel 8.0;IMEX=1")
sql = ("Select * into [;database=" & accessPath & "]." & accessTable & " from [" & sheet & "$]")
db.Execute (sql)
第②中最好了,就像3楼大哥说的,但我只找到在Excel中用VBA做的代码
为什么?难道就不能在导入之前加一段代码,该段代码的功能是:读Excel → 去空格 → 将改好的数据写入原来的Excel能不能这样实现只是小弟的无畏构想,呵呵,汗一个
小弟自己写了一个,不知道行不行,假设要将第一列的数据去空格For n = 0 To rs.RecordCount
rs.Fields(0).Value = trim(rs.Fields(0).Value)
next n
rs.Update
rs.Fields(0).Value = trim(rs.Fields(0).Value)
next n
rs.Update
rs.Fields(0).Value = trim(rs.Fields(0).Value)
rs.Update
rs.movenext
next n