精华区 [关闭][返回]

当前位置:网易精华区>>讨论区精华>>编程开发>>● 数据库技术>>VisualBasic专题>>VB Tips(5) -- 将数据库内容输出为Html表

主题:VB Tips(5) -- 将数据库内容输出为Html表
发信人: johnnyxu()
整理人: (1999-07-04 09:24:27), 站内信件
VB Tips(5) -- 将数据库内容输出为Html表格和文本文件简单方法

输出为Html:
1、启动SQL Server 7.0的SQL Enterprise Manager,展开树状视图中的
   Management。
2、在Web Publishing的快捷菜单中选'New Web Assistant Job...'
3、在Web Assistant Wizard中按提示一步步将数据库表的内容输出为Html
   文件,并在最后一步中选'Write Transact-SQL to File...',将SQL语
   句保存到文本文件。
4、打开这个文本文件,内容是一个带许多参数的系统存储过程sp_makewebtask,

5、在VB中用ADO代码运行这个存储过程,生成Html表格。

   借助Web Assistant Wizard的强大功能,生成sp_makewebtask语句,用
VB能方便灵活地生成Html表格。

将服务器Server1中的数据库pubs中的表'jobs'的内容输出为文本文件:
    
    Dim MyServer As SQLDMO.SQLServer
    Dim MyDatabase As SQLDMO.Database
    Dim MyTable As SQLDMO.Table
    Dim oBcp As SQLDMO.BulkCopy
    
    Set MyServer = New SQLDMO.SQLServer
    MyServer.Connect "server1", "sa", ""
    Set MyDatabase = MyServer.Databases("pubs")
    Set MyTable = MyDatabase.Tables("jobs")
    Set oBcp = New SQLDMO.BulkCopy
    oBcp.DataFileType = SQLDMODataFile_TabDelimitedChar
    oBcp.ExportWideChar = False
    oBcp.DataFilePath = "c:\Bcp.txt"
    MyTable.ExportData oBcp

John
[email protected]

--
※ 来源:.月光软件站 http://www.moon-soft.com.[FROM: 202.109.33.145]

[关闭][返回]