怎样将记录列表信息导出到一个Excel文件中!

Question

怎样将记录列表信息导出到一个Excel文件中!记录列表是数据集!

Answer 1

Private Sub Command1_Click()    Dim cn  As New ADODB.Connection
    
    cn.open "Driver={SQL Server};Server=yangao;DataBase=xinzi;UID=sa;PWD=12345;"
    
    cn.execute "master..xp_cmdshell bcp ""select * from xinzi.dbo.bankcard"" queryout c:\temp2.xls -c -S""yangao"" -U""sa"" -P""12345"""End Sub复制过去
yangao替换成你的服务器
xinzi替换成你的数据库
12345替换成你的服务器密码
select * from xinzi.dbo.bankcard替换成你的查询

Answer 2

cn.execute "master..xp_cmdshell bcp ""select * from xinzi.dbo.bankcard"" queryout c:\temp2.xls -c -S""yangao"" -U""sa"" -P""12345"""
此行行吗？
好像有问题！