怎么得到服务器上所有数据库的名字

如何得到服务器上所有数据库的名字
我得备份数据库,希望按一个按钮,程序可以自动到指定服务器上的所有数据库并备份,请给出比较全的程序代码,备份部分不用,谢谢

------解决方案--------------------
你的问题很奇怪:到底你是问 "如何得到服务器上所有数据库的名字 ",还是 "指定服务器上的所有数据库并备份 ",还是 "备份部分不用 "???
------解决方案--------------------
噢,比较全的代码,俺没有
------解决方案--------------------
rar压缩使用文件全路径,看看
------解决方案--------------------
参考RAR的开发手册
------解决方案--------------------
rarexe = "C:\winrar\winrar " ' winrar 执行文件的位置
这句改成这样写试试:
rarexe = "C:\winrar\winrar.exe " ' winrar 执行文件的位置
------解决方案--------------------
调用命令行,应用RAR.EXE