我正在使用此代码,但由于某种原因,任何大于 8 个字符的名称都会被截断:
Dim SaveName As String
Dim CurrentDate As Date
CurrentDate = Now
SaveName = InputBox("Save Database as..", "Save as..", CurrentDate)
DoCmd.TransferDatabase _
acExport, _
"dBase IV", _
"C:\Data\PLC_MOBZ\Test\export", _
acTable, _
"DB_Total", _
SaveName, _
False
正如您所理解的,即使没有输入任何内容,默认名称也会是:
"22-2-2013 14:42:44"
需要超过 8 个字符。