K：可以在程序中创建 SQLServer的数据库和ODBC的DSN吗？ (50分)

如体。

没数据库怎么连起来的?
你说的是创建表吧.
query.sql:
create talbe k
(k1 int
k2 char(10)
)
ODBC没用过

嘿嘿
不是表
我在瞎想，能不能程序中创建SQL的数据库。免得跑到SQLSERVER里去创建数据库。

不能吧！？
SQL的数据库。应在SQLSERVER里建，也就是说
创建SQL的数据库应在SQLSERVER环境。
这是我的理解，不一定对。

我也是这么想的。不知道有没有可能。。呵呵

把那些创建的语句写成一个.sql文件
然后用SQL Server 运行就行啦。
如果能让SQL 自动运行你的.sql文件，其实就算是实现啦。

可以的


CREATE DATABASE database_name
[ ON [PRIMARY]
[ <filespec> [,...n] ]
[, <filegroup> [,...n] ]
]
[ LOG ON { <filespec> [,...n]} ]
[ FOR LOAD | FOR ATTACH ]

<filespec> ::=

( [ NAME = logical_file_name, ]
FILENAME = 'os_file_name'
[, SIZE = size]
[, MAXSIZE = { max_size | UNLIMITED } ]
[, FILEGROWTH = growth_increment] ) [,...n]

<filegroup> ::=

FILEGROUP filegroup_name <filespec> [,...n]

OK
那ODBC的DSN呢？

考虑一下嘛

一种办法是改注册表，见其他帖子，另一种是：

function SQLConfigDataSource(HWndParent:THandle;fRequest:integer;
Driver,AttributesChar):integer;
stdcall; external ODBCCP32.DLL';

function InstallODBCDriver(dbfile:string):integer;
begin
result := SQLConfigDataSource(0,ord(ODBC_ADD_SYS_DSN),
'Sybase SQL Anywhere 5.0',
PChar('DBF=' + PChar(dbfile) + #0
+ 'DSN=MyODBC_DSN' + #0
+ 'DESCRIPTION=Description of MyODBC_DSN' + #0
+ 'KeysInSQLStatistics=1' + #0
+ 'TranslationName=Sybase SQL Anywhere 5.0 Transl' + #0
+ 'TranslationOption=1' + #0
+ #0));
end;

多人接受答案了。