Office中国论坛/Access中国论坛

标题: [求助]我想打开带有密码的文件，该怎么写 [打印本页]

作者: zzf0400 时间: 2006-10-25 10:55
标题: [求助]我想打开带有密码的文件，该怎么写
我想打开带有密码的文件，D:\mi1.5\mi1.5\mc-1.xls密码为888，该怎么写，

以下为原来的事件代码

Private Sub Command9_Click()
On Error GoTo Err_Command9_Click

Dim stAppName As String

stAppName = "Excel.exe D:\mi1.5\mi1.5\mc-1.xls"
Call Shell(stAppName, 1)

Exit_Command9_Click:
Exit Sub

Err_Command9_Click:
MsgBox Err.Description
Resume Exit_Command9_Click

End Sub

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