Office中国论坛/Access中国论坛

标题: 请教批量更改文件名的问题。急！急！急！ [打印本页]

作者: lhj88 时间: 2003-8-8 20:43
标题: 请教批量更改文件名的问题。急！急！急！
请各位帮忙，我需要将数据库中的职工号批量替换为职工姓名，非常感谢！！！
[attach]1376[/attach]

作者: lhj88 时间: 2003-8-8 22:12
怎么没有答复？

作者: eio 时间: 2003-8-8 23:17
                  \\\|///
               \\ ~~ ~~ //
               (  @ @  )
┏━━━━━oOOo━(www.eio.com.cn)━oOOo━━┓
┃★☆☆－全自动（数码）电话录音设备－☆☆★    ┃
┃TEL：0760-2121286 0760-2123061 0760-8567110┃
┃手机：013068186386 联系人：何镇安          ┃
┃网址:HTTP://WWW.EIO.COM.CN                         ┃
┃    广东省中山市爱欧电子电器厂             ┃
┗━━━━━━━━oooO━━( )━━━━━━━━━┛
               ( ) ) /
               \ ( (_/
                  \_)
★旧贴不是有吗？★
－－－－－－－－－－
如当前的BMP目录下有0.BMP-12.BMP，如何批量替换为窗体的姓名.bmp?

On Error Resume Next
Me.RecordsetClone.MoveFirst
Do While Not Me.RecordsetClone.EOF
Name CurrentProject.Path & "\bmp\" & RecordsetClone("ID") & ".bmp" As CurrentProject.Path & "\bmp\" & RecordsetClone("职工姓名") & ".bmp"
Me.RecordsetClone.MoveNext
Loop

[此贴子已经被作者于2003-8-8 15:17:58编辑过]

作者: 我要飞 时间: 2003-8-8 23:20
删除工号字段，将姓名字段改名为工号，最简单吧！

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)