欧美一区二区三区老妇人-欧美做爰猛烈大尺度电-99久久夜色精品国产亚洲a-亚洲福利视频一区二区

vb.net語(yǔ)法導(dǎo)包 VBNET編程寶典

vb.net怎樣打包?

打包的具體操作步驟:

成都創(chuàng)新互聯(lián)提供高防服務(wù)器租用、云服務(wù)器、香港服務(wù)器、眉山服務(wù)器托管

1)新建“安裝和部署項(xiàng)目”-- “安裝向?qū)А?/p>

2)選擇菜單中 項(xiàng)目-- 添加-- 文件(這里選“創(chuàng)建用于windows應(yīng)用程序.exe你的數(shù)據(jù)庫(kù)文件”)-- 打開(kāi)

3)一般會(huì)自動(dòng)將依賴(lài)項(xiàng)添加到“檢測(cè)到的依賴(lài)項(xiàng)”,如果沒(méi)有,那么我們要手動(dòng)將其加入4)

Crystal_Managed2003.msm (如果有水晶報(bào)表)

dotnetfxredist_x86.msm (.net一定是必須的)

... (如果有引用其他的dll)

4)手動(dòng)加入要包含的文件:項(xiàng)目-- 添加-- 合并模塊(添加你的程序文件) (包括dotNetFramework和MDAC27)

位于:C:\Program Files\Common Files\Merge Modules\ 下

具體功能如下:

(托管組件 MSM 處理所有托管組件的分發(fā),其中包括 Windows 窗體查看器、Web 窗體查看器和所有 Crystal Decisions 命名空間)

* Crystal_Managed2003.msm、

Crystal_Managed2003_chs.msm、

(對(duì)于使報(bào)表運(yùn)行所需的所有其他文件,由數(shù)據(jù)庫(kù)訪問(wèn) MSM 處理其分發(fā)。其中包括數(shù)據(jù)庫(kù)、導(dǎo)出和圖表驅(qū)動(dòng)程序。)

* Crystal_Database_access2003.msm、

Crystal_Database_access2003_chs.msm、

(KeyCode MSM 處理 Crystal Decisions 密鑰號(hào)碼的安裝,注意是添加合并模塊,否則沒(méi)有“MergeMouduleProperties”屬性)

* Crystal_regwiz2003.msm、

(是vc的運(yùn)行庫(kù),估計(jì)是Crystal Report或涉及到的某些程序是用vc寫(xiě)的,所以需要它!)

VC_User_CRT71_RTL_X86_---.msm、

VC_User_STL71_RTL_X86_---.msm、

5)打開(kāi)解決方案-- 右鍵點(diǎn)擊Crystal_regwiz2003.msm的屬性,在“MergeMouduleProperties”里的“License Key”填入:AAP5GKS0000GDE100DS(這個(gè)是你生成Crystal Report是用到的注冊(cè)號(hào)的密碼!)

6)生成解決方案(或直接按Ctrl+Shift+B)

至此整個(gè)分發(fā)程序已經(jīng)做好,再把剛才做的那個(gè)安裝程序雙擊一下……

-----------------------------------------------------------------------

打包時(shí)加入卸載功能:

方法一:

1.在打包項(xiàng)目中添加文件msiexec.exe(一般可在c:\windows\system32\下找到)

2.在文件系統(tǒng)視圖中選擇應(yīng)用程序文件夾,在msiexec.exe上按右鍵,選擇創(chuàng)建快捷方式,重命名快捷方式為 "卸載 ".

3.更改此快捷方式的Arguments 為 "/x {產(chǎn)品id} ",產(chǎn)品id的值為打包項(xiàng)目的ProductCode屬性值.

方法二:(推薦)

1.先生成安裝包,記下ProductCode,下面要用到

2.用VS.net建立一個(gè)新的控制臺(tái)程序uninst.exe文件

'power by: landlordh

'for 2000,xp,2003

Module uninstall

Sub Main()

Dim myProcess As Process = New Process

If System.Environment.OSVersion.ToString.IndexOf( "NT 5 ") Then

myProcess.Start( "msiexec ", "/X{2B65D4A9-C146-4808-AB4B-321FB0779559} ") '改為自己的ProductCode

End If

myProcess.Close()

End Sub

End Module

3.將控制臺(tái)程序BIN目錄的exe文件加入到打包程序文件中,在程序組創(chuàng)建uninst.exe的快捷方式

如果裝個(gè)ms的控件的話,則直接把framework和msac打在包里。

VB.NET編程語(yǔ)法

你這是vb.net的代碼,vb中不允許那么寫(xiě):

Dim strdx() As String = {"0", "0", "0"} '定義個(gè)數(shù)組,從后面的值能看的出最大下標(biāo)是2,也就是strdx(0),strdx(1)和strdx(2),3個(gè)的默認(rèn)值都為0

Dim calcount1 As String = "0" '定義個(gè)字符串變量

Dim calcount2 As String = "0"

Dim strvalue As Boolean = False '定義strvalue為bool值,改類(lèi)型變量只有true和false 2種值

If strdx(0) = "0" Then

TextBox1.Text = strdx(0) "." 這是字符串連接符號(hào),和"+"的區(qū)別是,他把左右2邊的內(nèi)容直接連接的,而"+"可能會(huì)編程運(yùn)算符,例如 2 3 = "23" 而 2 + 3 = 5

ElseIf strvalue = False Then

strdx(0) = strdx(0) "0"

TextBox1.Text = strdx(0) "."

strvalue = True

Else

strdx(0) = strdx(0) "0"

TextBox1.Text = strdx(0)

Select Case calcount1 ' 這里開(kāi)始是分支語(yǔ)句

Case "+"

TextBox1.Text = Str(Val(strdx(1)) + Val(strdx(0)))

VB.NET怎么導(dǎo)出組件

如何從web頁(yè)面導(dǎo)入excel單元格數(shù)據(jù)、又如何把查詢(xún)出來(lái)的數(shù)據(jù)放到web頁(yè)面上顯示成客戶(hù)需要的圖表?并且導(dǎo)出到excel中?有兩種方案: 1.用Excel自動(dòng)化技術(shù)。引用Excel的類(lèi)型庫(kù)生成.Net的包裝類(lèi)。導(dǎo)入時(shí)采用頁(yè)面放上傳文件按鈕的方法,在服務(wù)器端收到文件后,用excel自動(dòng)化類(lèi)打開(kāi)excel文件,再學(xué)會(huì)VBA語(yǔ)法,書(shū)寫(xiě)大量的代碼讀取單元格,然后連接數(shù)據(jù)庫(kù)保存。導(dǎo)出時(shí),查詢(xún)數(shù)據(jù)庫(kù),啟動(dòng)excel自動(dòng)化對(duì)象,通過(guò)VBA語(yǔ)法填寫(xiě)單元格,保存成excel文件,再用Response.OutputStream輸出到頁(yè)面上,觸發(fā)excel文件的下載保存框。缺點(diǎn):容易在服務(wù)器端產(chǎn)生excel死進(jìn)程,代碼編寫(xiě)復(fù)雜、代碼量大、還要掌握VBA語(yǔ)法,用戶(hù)需要上傳、下載操作有人會(huì)說(shuō),顯示數(shù)據(jù)時(shí)可以用網(wǎng)頁(yè)直接顯示,不用導(dǎo)出成excel。其實(shí)也很麻煩:用網(wǎng)頁(yè)顯示復(fù)雜的報(bào)表格式,網(wǎng)頁(yè)設(shè)計(jì)工作量大;如果客戶(hù)要求導(dǎo)出excel,這個(gè)工作就省不了;如果客戶(hù)要求打印、打印預(yù)覽、頁(yè)面設(shè)置,比起excel瀏覽器的打印就捉襟見(jiàn)肘了。 2.用微軟Office中間件——SOAOffice。(建議使用最新版的)用SOAOffice輸出Excel,就不會(huì)再有上述煩惱。通過(guò)SOAOffice不僅能夠動(dòng)態(tài)填充excel,讀取excel單元格,而且還能在瀏覽器里直接瀏覽excel、或者下載、另存。SOAOffice提供標(biāo)準(zhǔn)C#.Net組件,組件在服務(wù)器端不使用自動(dòng)化調(diào)用,穩(wěn)定支持大量web并發(fā)訪問(wèn),這是用com調(diào)用無(wú)法實(shí)現(xiàn)的。組件的屬性方法都比較簡(jiǎn)單,易于調(diào)用,你完全不用去掌握復(fù)雜的VBA調(diào)用。 由于是純.Net組件,所以服務(wù)器端不需安裝office。 SOAOffice的excel組件SOAExcel含有Sheet、Cell等類(lèi)似Excel的簡(jiǎn)化接口,調(diào)用簡(jiǎn)單。SOAExcel不但能能把數(shù)據(jù)庫(kù)字段值動(dòng)態(tài)填充到Excel單元格,還能把用戶(hù)輸入的單元格的值提出給開(kāi)發(fā)者保存到數(shù)據(jù)庫(kù)。 SOAExcel能夠在客戶(hù)端瀏覽器的網(wǎng)頁(yè)里通過(guò)SOAOffice直接顯示生成的Excel,用戶(hù)不必先下載再打開(kāi)觀看內(nèi)容。 舉個(gè)導(dǎo)出excel的例子: SOAOfficeX.ExcelResponse SOAExcel = new SOAOfficeX.ExcelResponse(); SOAOfficeX.ExcelResSheet sheet1 = SOAExcel.openSheet("Sheet1"); // 打開(kāi)一個(gè)Sheet sheet1.openCell("D"+String.valueOf(8+i)).setValue(rs.getString("Count")); //循環(huán)填充數(shù)據(jù)。 SOAOfficeX.SOAOfficeCtrl SOACtrl = new SOAOfficeX.SOAOfficeCtrl(response); SOACtrl.assign(SOAExcel); // 綁定數(shù)據(jù) // 打開(kāi)模板并生成最終的excel報(bào)表 SOACtrl.webOpen("doc/test.xls", 1, UserName, "Excel.Sheet"); 上述代碼不但動(dòng)態(tài)填充生成excel,而且在網(wǎng)頁(yè)里直接顯示生成的Excel給終端用戶(hù),由于使用了1打開(kāi)模式,Excel是只讀顯示的。 讀取excel單元格的代碼也很簡(jiǎn)單: SOAOfficeX.ExcelRequest SOAExcel = new SOAOfficeX.ExcelRequest(); SOAOfficeX.IExcelReqSheet sheetOrder = SOAExcel.OpenSheet("銷(xiāo)售訂單"); SOAOfficeX.IExcelReqCell cell1; cell1 = sheetOrder.OpenCell("I5");//訂單編碼 string sOrderNum = cell1.Value;//cell1.Value就是讀取的結(jié)果

分享名稱(chēng):vb.net語(yǔ)法導(dǎo)包 VBNET編程寶典
分享URL:http://chinadenli.net/article0/hghpoo.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站收錄電子商務(wù)服務(wù)器托管微信公眾號(hào)云服務(wù)器

廣告

聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶(hù)投稿、用戶(hù)轉(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)

商城網(wǎng)站建設(shè)