vb.net语法导包 VBNET编程宝典

vb.net怎样打包?

打包的具体操作步骤:

成都创新互联提供高防服务器租用、云服务器、香港服务器、眉山服务器托管

1)新建“安装和部署项目”-- “安装向导”

2)选择菜单中 项目-- 添加-- 文件(这里选“创建用于windows应用程序.exe你的数据库文件”)-- 打开

3)一般会自动将依赖项添加到“检测到的依赖项”,如果没有,那么我们要手动将其加入4)

Crystal_Managed2003.msm (如果有水晶报表)

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

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

4)手动加入要包含的文件:项目-- 添加-- 合并模块(添加你的程序文件) (包括dotNetFramework和MDAC27)

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

具体功能如下:

(托管组件 MSM 处理所有托管组件的分发,其中包括 Windows 窗体查看器、Web 窗体查看器和所有 Crystal Decisions 命名空间)

* Crystal_Managed2003.msm、

Crystal_Managed2003_chs.msm、

(对于使报表运行所需的所有其他文件,由数据库访问 MSM 处理其分发。其中包括数据库、导出和图表驱动程序。)

* Crystal_Database_access2003.msm、

Crystal_Database_access2003_chs.msm、

(KeyCode MSM 处理 Crystal Decisions 密钥号码的安装,注意是添加合并模块,否则没有“MergeMouduleProperties”属性)

* Crystal_regwiz2003.msm、

(是vc的运行库,估计是Crystal Report或涉及到的某些程序是用vc写的,所以需要它!)

VC_User_CRT71_RTL_X86_---.msm、

VC_User_STL71_RTL_X86_---.msm、

5)打开解决方案-- 右键点击Crystal_regwiz2003.msm的属性,在“MergeMouduleProperties”里的“License Key”填入:AAP5GKS0000GDE100DS(这个是你生成Crystal Report是用到的注册号的密码!)

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

至此整个分发程序已经做好,再把刚才做的那个安装程序双击一下……

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

打包时加入卸载功能:

方法一:

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

2.在文件系统视图中选择应用程序文件夹,在msiexec.exe上按右键,选择创建快捷方式,重命名快捷方式为 "卸载 ".

3.更改此快捷方式的Arguments 为 "/x {产品id} ",产品id的值为打包项目的ProductCode属性值.

方法二:(推荐)

1.先生成安装包,记下ProductCode,下面要用到

2.用VS.net建立一个新的控制台程序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.将控制台程序BIN目录的exe文件加入到打包程序文件中,在程序组创建uninst.exe的快捷方式

如果装个ms的控件的话,则直接把framework和msac打在包里。

VB.NET编程语法

你这是vb.net的代码,vb中不允许那么写:

Dim strdx() As String = {"0", "0", "0"} '定义个数组,从后面的值能看的出最大下标是2,也就是strdx(0),strdx(1)和strdx(2),3个的默认值都为0

Dim calcount1 As String = "0" '定义个字符串变量

Dim calcount2 As String = "0"

Dim strvalue As Boolean = False '定义strvalue为bool值,改类型变量只有true和false 2种值

If strdx(0) = "0" Then

TextBox1.Text = strdx(0) "." 这是字符串连接符号,和"+"的区别是,他把左右2边的内容直接连接的,而"+"可能会编程运算符,例如 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 ' 这里开始是分支语句

Case "+"

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

VB.NET怎么导出组件

如何从web页面导入excel单元格数据、又如何把查询出来的数据放到web页面上显示成客户需要的图表?并且导出到excel中?有两种方案: 1.用Excel自动化技术。引用Excel的类型库生成.Net的包装类。导入时采用页面放上传文件按钮的方法,在服务器端收到文件后,用excel自动化类打开excel文件,再学会VBA语法,书写大量的代码读取单元格,然后连接数据库保存。导出时,查询数据库,启动excel自动化对象,通过VBA语法填写单元格,保存成excel文件,再用Response.OutputStream输出到页面上,触发excel文件的下载保存框。缺点:容易在服务器端产生excel死进程,代码编写复杂、代码量大、还要掌握VBA语法,用户需要上传、下载操作有人会说,显示数据时可以用网页直接显示,不用导出成excel。其实也很麻烦:用网页显示复杂的报表格式,网页设计工作量大;如果客户要求导出excel,这个工作就省不了;如果客户要求打印、打印预览、页面设置,比起excel浏览器的打印就捉襟见肘了。 2.用微软Office中间件——SOAOffice。(建议使用最新版的)用SOAOffice输出Excel,就不会再有上述烦恼。通过SOAOffice不仅能够动态填充excel,读取excel单元格,而且还能在浏览器里直接浏览excel、或者下载、另存。SOAOffice提供标准C#.Net组件,组件在服务器端不使用自动化调用,稳定支持大量web并发访问,这是用com调用无法实现的。组件的属性方法都比较简单,易于调用,你完全不用去掌握复杂的VBA调用。 由于是纯.Net组件,所以服务器端不需安装office。 SOAOffice的excel组件SOAExcel含有Sheet、Cell等类似Excel的简化接口,调用简单。SOAExcel不但能能把数据库字段值动态填充到Excel单元格,还能把用户输入的单元格的值提出给开发者保存到数据库。 SOAExcel能够在客户端浏览器的网页里通过SOAOffice直接显示生成的Excel,用户不必先下载再打开观看内容。 举个导出excel的例子: SOAOfficeX.ExcelResponse SOAExcel = new SOAOfficeX.ExcelResponse(); SOAOfficeX.ExcelResSheet sheet1 = SOAExcel.openSheet("Sheet1"); // 打开一个Sheet sheet1.openCell("D"+String.valueOf(8+i)).setValue(rs.getString("Count")); //循环填充数据。 SOAOfficeX.SOAOfficeCtrl SOACtrl = new SOAOfficeX.SOAOfficeCtrl(response); SOACtrl.assign(SOAExcel); // 绑定数据 // 打开模板并生成最终的excel报表 SOACtrl.webOpen("doc/test.xls", 1, UserName, "Excel.Sheet"); 上述代码不但动态填充生成excel,而且在网页里直接显示生成的Excel给终端用户,由于使用了1打开模式,Excel是只读显示的。 读取excel单元格的代码也很简单: SOAOfficeX.ExcelRequest SOAExcel = new SOAOfficeX.ExcelRequest(); SOAOfficeX.IExcelReqSheet sheetOrder = SOAExcel.OpenSheet("销售订单"); SOAOfficeX.IExcelReqCell cell1; cell1 = sheetOrder.OpenCell("I5");//订单编码 string sOrderNum = cell1.Value;//cell1.Value就是读取的结果


标题名称:vb.net语法导包 VBNET编程宝典
本文网址:http://bzwzjz.com/article/hghpoo.html

其他资讯

Copyright © 2007-2020 广东宝晨空调科技有限公司 All Rights Reserved 粤ICP备2022107769号
友情链接: 成都企业网站制作 营销型网站建设 成都网站设计 定制网站建设 重庆电商网站建设 网站制作报价 成都网站建设 攀枝花网站设计 移动网站建设 重庆网站建设 达州网站设计 成都网站设计 成都网站建设 成都商城网站制作 宜宾网站设计 高端网站建设 网站设计制作 自适应网站建设 教育网站设计方案 成都网站设计 企业网站建设 网站建设方案