# Re: 有个密码的问题..,烦请帮忙

Posted by Knight on April 03, 1999 at 09:57:23:

In Reply to: 有个密码的问题..,烦请帮忙 posted by 小雯 on April 03, 1999 at 00:04:28:

: 我有个程式：
: aa:
: on error resume next
: Set db = DBEngine.Workspaces(0).OpenDatabase(dbname, False, False, ";pwd=" & pstring)
: if Err.Number=3031
: choice = MsgBox(dbname & "输入密码吗?", vbYesNo, "资料库密码锁定")
: If choice = vbYes Then
: Form2.Show<--我想用form2来接收密码，但好像在msgbox按”是”时
: endif msgbox还是一直出现,想请问,这里到底该如何写,才能
: endif 顺利接收密码??
form2.show 1
加1在后面可以强迫form2执行完才继续执行

Follow Ups:

- 但是.....还是有问题ㄝ~~ 小雯 00:32:20 4/04/99 (1)
  - Re: 但是.....还是有问题ㄝ~~ Mouse 02:55:35 4/04/99 (0)