谁知道怎样在VC程序中实现：在SQLServer2000中创建一个数据库？

[zrq827]

水平有限，请贴上代码，谢谢大家，

[孤必有邻]

贴一段：
CDatabase * Database = new CDatabase;
try
{
if (ListServer.mLinkMode == 0)
string.Format("ODBC;DRIVER={SQL Server};SERVER=%s;Trusted_Connection=YES", szServer);
else
string.Format("ODBC;DRIVER={SQL Server};SERVER=%s;UID=%s;PWD=%s", szServer, ListServer.mUser, ListServer.mPwd);
Database->Open(NULL, FALSE, FALSE, string);
Database->ExecuteSQL("create database dbname");
}
catch( CDBException * sError )
{
AfxMessageBox( sError->m_strError, MB_ICONEXCLAMATION );
sError->Delete();
}

[flyelf]

gz

[ablefirst]

CString strQuery;
strQuery.Format("Create databse hello");
try
{

m_pRecordset=m_pConnection->Execute((LPCTSTR)strQuery,NULL,-1);

}

[zrq827]

各位老大，你们创建数据库都是已经建立了数据源，现在是数据库都没有，哪来的数据源啊，怎样初始化CDatabase啊，

[zrq827]

不是吧，没能人了吗？还是太低级，不屑与回复啊！？

[cdwy411]

你去看一下 SQL Server中的创建数据库的SQl 语句 "create database ......."???

CString str="create database ....."

m_database.Execute(str,...);
直接用语句执行即可！

[sunyuan_01]

_ConnectionPtr pConnect = NULL;
HRESULT hr = pConnect.CreateInstance(__uuidof(Connection));
if(FAILED(hr))
AfxMessageBox("Failed");
_bstr_t strConnect ="Provider=SQLOLEDB;Server=PearlSoft01;Database=master;UID=sa;PWD=;";
try
{
pConnect->Open(strConnect,"","",NULL);
}
catch(_com_error &e)
{
AfxMessageBox(e.Description());
}

_bstr_t strSQL = "CREATE DATABASE Products ON (NAME=prods_dat,FILENAME='d:\\program files\\Microsoft SQL Server\\MSSQL$DATASERVER\\Data\\prods.mdf',SIZE=4,MAXSIZE=10,FILEGROWTH=1)";
VARIANT nNum;
try
{
pConnect->Execute(strSQL,&nNum,adCmdText);
}
catch(_com_error &e)
{
AfxMessageBox(e.Description());
}
可以将_ConnectionPtr中的->Execute()换成_CommandPtr中的相应方法,要不会有个创建数据库的对话框

[sunyuan_01]

_bstr_t strConnect ="Provider=SQLOLEDB;Server=PearlSoft01;Database=master;UID=sa;PWD=;";
这个串你自己改一下,Server(计算机名),数据库(先用master),用户(sa),密码("")

[henryzc]

先连接到主数据库，master，然后就可以用上面的代码建立你自己的数据库了。

你说的CDatabase是想用ODBC建立数据库吗？还是用ADO好点