VB中 关于SQL 数据库备份与还原的代码怎么写,最好有注释
1个回答
展开全部
me.mousepointer=11
if text1.text="铅腔"亏银then
msgbox"请您选择数据库备份路径槐空衫",64,"提示信息"elsedim connter as integer
dim sql,workarea(12) as string
progressbar1.visible=true
progressbar1.max=ubound(workarea)
progressbar1.value=progressbar1.min
for connter=lbound(workarea)to ubound (workarea)
workarea(connter)="initial value"&connter
progressbar1.value=connter
strcnn.open
sql="backup database da_data to disk=""& text1.text&""
strcnn.execute(sql)
strcnn.close
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询