分類: 電腦/網(wǎng)絡(luò) 程序設(shè)計(jì) 其他編程語(yǔ)言

成都創(chuàng)新互聯(lián)公司企業(yè)建站,十多年網(wǎng)站建設(shè)經(jīng)驗(yàn),專注于網(wǎng)站建設(shè)技術(shù),精于網(wǎng)頁(yè)設(shè)計(jì),有多年建站和網(wǎng)站代運(yùn)營(yíng)經(jīng)驗(yàn),設(shè)計(jì)師為客戶打造網(wǎng)絡(luò)企業(yè)風(fēng)格,提供周到的建站售前咨詢和貼心的售后服務(wù)。對(duì)于成都網(wǎng)站建設(shè)、成都網(wǎng)站設(shè)計(jì)中不同領(lǐng)域進(jìn)行深入了解和探索,創(chuàng)新互聯(lián)在網(wǎng)站建設(shè)中充分了解客戶行業(yè)的需求,以靈動(dòng)的思維在網(wǎng)頁(yè)中充分展現(xiàn),通過(guò)對(duì)客戶行業(yè)精準(zhǔn)市場(chǎng)調(diào)研,為客戶提供的解決方案。
問(wèn)題描述:
在SQL數(shù)據(jù)庫(kù)里已有一個(gè)現(xiàn)成的空數(shù)據(jù)表(只有字段、沒(méi)有數(shù)據(jù)),請(qǐng)問(wèn)高手,怎樣在VB.NET中用SQL語(yǔ)句把該數(shù)據(jù)庫(kù)中的那個(gè)表復(fù)制一個(gè)到該數(shù)據(jù)庫(kù)(字段不變、數(shù)據(jù)為空)只是把數(shù)據(jù)表的名改了?
謝謝!謝謝!
解析:
select * into 新表 from 舊表
使用 SELECT INTO 插入行
SELECT INTO 語(yǔ)句創(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ù)的新表。
追問(wèn): 只有那個(gè)辦法? 回答: 是,這跟SQL Server不同,ACCESS是獨(dú)立文件的,而且它能支持的SQL語(yǔ)句有限,一般是使用ACCESS來(lái)創(chuàng)建,若要?jiǎng)討B(tài)創(chuàng)建,只能用ADO了,但Sql Server就不同了,它可以執(zhí)行復(fù)雜的SQL語(yǔ)句,相對(duì)來(lái)說(shuō),動(dòng)態(tài)創(chuàng)建數(shù)據(jù)庫(kù)和表,要比ACCESS方便。 追問(wèn): 創(chuàng)建表的話能用SQL語(yǔ)句了嗎? 回答: 沒(méi)試過(guò),應(yīng)該不行 追問(wèn): 那你能告訴我下怎么創(chuàng)建表嗎?創(chuàng)建數(shù)據(jù)庫(kù)我會(huì)了 回答: 可以使用DAO對(duì)象來(lái)操作,注意是DAO對(duì)象,不是ADO對(duì)象! 追問(wèn): 能不能詳細(xì)說(shuō)下過(guò)程呢?創(chuàng)建表的過(guò)程 回答: 創(chuàng)建表的過(guò)程用DAO.net和ADO.net都可以,創(chuàng)建數(shù)據(jù)庫(kù)可以用DAO對(duì)象,既然你已經(jīng)可以創(chuàng)建數(shù)據(jù)庫(kù),那么創(chuàng)建表只要先連接到這個(gè)數(shù)據(jù)庫(kù),然后用create table語(yǔ)句來(lái)執(zhí)行就行了,可以使用OledbConnection先連接這個(gè)庫(kù),接著用OledbCommand對(duì)象的ExecuteNonQuery來(lái)執(zhí)行create table語(yǔ)句即可。
是否可以解決您的問(wèn)題?
‘首先,創(chuàng)建一個(gè)VB.NET項(xiàng)目,再點(diǎn)擊菜單”項(xiàng)目“-”添加引用“,在”Com“-”類型庫(kù)“里,選擇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
你可以再創(chuàng)建一個(gè)表叫獎(jiǎng)金類別,其中間個(gè)固定獎(jiǎng)金的列出來(lái),并注明獎(jiǎng)金是多少,不固定的就另外存。
沒(méi)有寫完吧
Try
sqlcom.ExecuteNonQuery()
Catch?ae?As?SqlException
msgbox("fail")
End?Try
當(dāng)前名稱:vb.net創(chuàng)建表 vb新建excel工作表
文章起源:http://www.chinadenli.net/article14/dooegde.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供微信公眾號(hào)、App開發(fā)、建站公司、網(wǎng)站收錄、網(wǎng)站設(shè)計(jì)、服務(wù)器托管
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請(qǐng)盡快告知,我們將會(huì)在第一時(shí)間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場(chǎng),如需處理請(qǐng)聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時(shí)需注明來(lái)源: 創(chuàng)新互聯(lián)
移動(dòng)網(wǎng)站建設(shè)知識(shí)