Office中国论坛/Access中国论坛

标题: Kill "D:\生产计画\" & Date [打印本页]

作者: zyz218 时间: 2005-1-25 20:08
标题: Kill "D:\生产计画\" & Date
Private Sub Deleteit()

If Dir("D:\生产计画\" & Date) <> "" Then

Kill "D:\生产计画\" & Date

End If

End Sub

在每次关闭这个文件之前都会在D盘另存一份防止数据丢失,但我这个EXCEL 是共用的,我设了密码,结果第一次另存为可以,但第二次以后就不可以了,因为D盘的原文件有密码保护,于是我相了方法就是在每次打开的时候删除已存在的,我用上面的代码,得不行,不知为什么,老鬼请教

),其它高也行,,多多指点

)

作者: 老鬼 时间: 2005-1-25 22:27
把文件的扩展名给加上~~~~~

作者: zyz218 时间: 2005-1-26 00:52
非常感谢老鬼的帮助,问题已解决,多谢多谢,跑来跑去还是这里能解决问题,学习气氛也不错,呵

作者: 晓月清风 时间: 2005-6-9 22:58
太好了，我的相同问题也解决了

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