今天有时间,在命令窗口中试了下,都成功(foxtable对sql server 支持算不错,可惜现在仅仅是用于开发sql server (这点不满意永久保留:foxtable只是用sql server用户的福音,不是其他数据库用户的福音):
返回数据库的表名:
Dim cmd As New SQLCommand
cmd.C on nec tion Name ="tu"
Dim dt As DataTable
cmd.CommandText = "select name from sysobjects where type='U'"
dt = cmd.ExecuteReader()
For Each dr As Datarow In dt.Datarows
Output.Show(dr("name"))
Next
返回数据库名:
Dim cmd As New SQLCommand
cmd.Co nne ctio nN ame ="tu"
Dim dt As DataTable
cmd.CommandText = "SELECT DB_NAME() AS base"
dt = cmd.ExecuteReader()
For Each dr As Datarow In dt.Datarows
Output.Show(dr("base"))
Next
[此贴子已经被作者于2008-12-12 20:33:18编辑过]