[求助]如何弹出对话框
Set conn = Server.CreateObject("ADODB.Connection")conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("xscj.mdb")
set rsSchema=Conn.openSchema(20)
rsSchema.movefirst
Do Until rsSchema.EOF
if rsSchema("TABLE_NAME")="tj008211" then 在此处弹出对话框
rsSchema.movenext
Loop
set objConn=nothing
原程序如上,我请教的问题是如何在数据库xscj中找到数据表tj008211后,程序能弹出一个对话框,说明这表已经存在,并有一个按纽来决定是否进行下一步的操作。