追問: 只有那個(gè)辦法? 回答: 是,這跟SQL Server不同,ACCESS是獨(dú)立文件的,而且它能支持的SQL語句有限,一般是使用ACCESS來創(chuàng)建,若要?jiǎng)討B(tài)創(chuàng)建,只能用ADO了,但Sql Server就不同了,它可以執(zhí)行復(fù)雜的SQL語句,相對(duì)來說,動(dòng)態(tài)創(chuàng)建數(shù)據(jù)庫和表,要比ACCESS方便。 追問: 創(chuàng)建表的話能用SQL語句了嗎? 回答: 沒試過,應(yīng)該不行 追問: 那你能告訴我下怎么創(chuàng)建表嗎?創(chuàng)建數(shù)據(jù)庫我會(huì)了 回答: 可以使用DAO對(duì)象來操作,注意是DAO對(duì)象,不是ADO對(duì)象! 追問: 能不能詳細(xì)說下過程呢?創(chuàng)建表的過程 回答: 創(chuàng)建表的過程用DAO.net和ADO.net都可以,創(chuàng)建數(shù)據(jù)庫可以用DAO對(duì)象,既然你已經(jīng)可以創(chuàng)建數(shù)據(jù)庫,那么創(chuàng)建表只要先連接到這個(gè)數(shù)據(jù)庫,然后用create table語句來執(zhí)行就行了,可以使用OledbConnection先連接這個(gè)庫,接著用OledbCommand對(duì)象的ExecuteNonQuery來執(zhí)行create table語句即可。
武威ssl適用于網(wǎng)站、小程序/APP、API接口等需要進(jìn)行數(shù)據(jù)傳輸應(yīng)用場(chǎng)景,ssl證書未來市場(chǎng)廣闊!成為創(chuàng)新互聯(lián)公司的ssl證書銷售渠道,可以享受市場(chǎng)價(jià)格4-6折優(yōu)惠!如果有意向歡迎電話聯(lián)系或者加微信:18982081108(備注:SSL證書合作)期待與您的合作!
是否可以解決您的問題?
select * into 新表 from 舊表
使用 SELECT INTO 插入行
SELECT INTO 語句創(chuàng)建一個(gè)新表,并用 SELECT 的結(jié)果集填充該表。新表的結(jié)構(gòu)由選擇列表中表達(dá)式的特性定義,例如:
SELECT Shippers.*, Link.Address, Link.City,
Link.Region, Link.PostalCode
INTO NewShippers
FROM Shippers
JOIN LinkServer.DB.dbo.Shippers AS Link
ON (Shippers.ShipperID = Link.ShipperID)
SELECT INTO 可將幾個(gè)表或視圖中的數(shù)據(jù)組合成一個(gè)表。也可用于創(chuàng)建一個(gè)包含選自鏈接服務(wù)器的數(shù)據(jù)的新表。
沒有寫完吧
Try
sqlcom.ExecuteNonQuery()
Catch?ae?As?SqlException
msgbox("fail")
End?Try
‘首先,創(chuàng)建一個(gè)VB.NET項(xiàng)目,再點(diǎn)擊菜單”項(xiàng)目“-”添加引用“,在”Com“-”類型庫“里,選擇Microsoft.Word?14.0?Object?Library(對(duì)應(yīng)Office版本為2010),將以下代碼復(fù)制粘貼到Form1窗體替換原代碼。
’PS:以下代碼僅創(chuàng)建表格,將第行2至4列合并,添加1個(gè)文字,其他的你自己分析。
Imports?Microsoft.Office.Interop
Imports?Microsoft.Office.Interop.Word??'引入Word
Public?Class?Form1
Private?Sub?Form1_Load(sender?As?Object,?e?As?EventArgs)?Handles?MyBase.Load
Dim?DWrd?As?New?Word.Application,?DDoc?As?Word.Document?'定義Word及文檔對(duì)象
DDoc?=?DWrd.Documents.Add?'新增文檔
Dim?DTbl?As?Word.Table??'定義表格對(duì)象
DTbl?=?DDoc.Tables.Add(DDoc.Range,?7,?4)??'新增表格
DTbl.Style?=?"網(wǎng)格型"??'表格的樣式
DTbl.Cell(1,?2).Select()??'選擇起始單元格為第1行/第2列
DWrd.Selection.MoveRight(,?2,?SelectionMode.MultiExtended)??'向右擴(kuò)展兩個(gè)單元格(即選擇第1行的第2至4列)
DWrd.Selection().Cells.Merge()??'單元格合并
DTbl.Cell(1,?1).Range.Text?=?1??'在第1個(gè)單元格填寫文本
DWrd.Visible?=?True?'顯示W(wǎng)ord
End?Sub
End?Class