- 博客(25)
- 资源 (1)
- 收藏
- 关注
原创 vb.net excel 操作两个SHEET
Dim Excel As New Microsoft.Office.Interop.Excel.Application Dim xlssht1 As Microsoft.Office.Interop.Excel.Worksheet Dim xlssht2 As Microsoft.Office.Interop.Excel.Worksheet Me.WindowState = FormWin
2011-06-27 10:23:00
1485
原创 vb.net 中调用按钮单击事件
1.Button1.PerformClick() 2.button1_click(sender,e) 3.button1_click(nothing,nothing) 4.button1_click(sender,nothing)
2011-06-24 08:51:00
12587
原创 创建INDEX范本
创建INDEX范本 CREATE UNIQUE INDEX cx_1 ON pub.partopr (partnum,RevisionNum,OprSeq)
2011-06-23 17:29:00
443
原创 vb.net 中选择由某个单元格至最下面最后面一个单元格的区域
vb.net 中选择由某个单元格至最下面最后面一个单元格的区域 首先引用COM中的Microsoft Excel 12.0 Object Library,然后用以下代码来实现。 Dim Excel As New Microsoft.Office.Interop.Excel.Application Dim s_ExcelTemplatePath As String s_ExcelTempla
2011-06-23 17:27:00
1181
原创 NOT EXISTS的另一种写法
NOT EXISTS的另一种写法: 用外联接联接两个表,同时WHERE后取连接字段为空的行记录。 原始写法: Select * from TableA Where not exists(select 1 from TableB where TableB.FieldB= TableA.FieldA) 改良后的写法: Select * from TableA Left join Tabl
2011-06-23 17:27:00
972
原创 EPICOR 登录
客户端的连接写在Client/config文件夹下的default.mfgsys文件中的: 如果将 改为: 那么当你双击EPICOR应用程序图标,EPICOR会自动登录。
2011-06-23 17:24:00
689
原创 ODBC连接字符串怎么写
ODBC连接字符串怎么写: 1。先建立一个文件型的DSN(如:1.dsn)。 2。然后使用记事本打开该文件。 如:文件内容为: ----------------------------------------------------------- [ODBC] DRIVER=Driver do Microsoft Access (*.mdb)
2011-06-23 17:23:00
2693
原创 EPICOR 交易活动
在交易活动查询设计者里面,如果字段类型为BIT,那么此处的判断应写false或true. 在分析页签中,须敲TAB键3下,按回车是检查语法,再敲一下TAB键,再按回车,执行查询,会显示查询结果。
2011-06-23 17:22:00
605
原创 sqlCommand.ExecuteNonQuery返回sql语句影响行数问题
sqlCommand.ExecuteNonQuery返回sql语句影响行数问题 Public Shared Function sqlcon_Executeint(ByVal sql As String) As Integer 执行sql更新语句并返回影响行数,当为select语句时,请用count(*)样式 Using sqlcmd As New SqlCommand Dim sqlCom
2011-06-23 17:18:00
1153
原创 数字前补齐零的SQL范本
数字前补齐零的SQL范本 SELECT repeat(0,(4-length(CAST(dmdordnum AS varCHAR(4)))))+CAST(dmdordnum AS VARCHAR(4)) FROM PUB.UDPEGDMDMST
2011-06-23 17:17:00
745
原创 VB.NET读写INI配置文件
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load Dim path As String path = Application.StartupPath + "/Send.ini"
2011-06-23 17:01:00
728
原创 PROGRESS SQL
如果表内有SysDate或SysTime 字段,在取这些字段的时候,须用双引号括起来。因为SYSdate和SYStime本来也是数据库SQL关键字。
2011-06-23 17:00:00
2748
原创 PROGRESS 数据库单用户模式
数据库的独占模式方法:在PROGRESS EXPLORER TOOL里面,将数据库配置ODBCGROUP和MFGSYSGROUP的高级选项里,将最大的线程全改为1。 Progress数据库对于建表SQL里面的中文注释支持不好。尽量不要在SQL中用中文注释。
2011-06-23 16:58:00
528
原创 case 函数用法
在PROGRESS中,CASE 的三种写法 ***************************************************** Case具有两种格式。简单Case函数和Case搜索函数。 --简单Case函数 CASE sex WHEN 1 THEN 男 WHEN 2 THEN 女 ELSE 其他 END --Case搜索函数 CASE
2011-06-23 16:55:00
943
原创 SQL语句转VB.net 用SQL字符串
ULTRAEDIT 将SQL语句转换为VB.net 可用的SQL字符串 CTRl+R 查找:^p 替换为: " & _ ^p" 替换为的最前面有个空格。 最前面补个双引号,最后面补个双引号。
2011-06-23 16:50:00
610
原创 vb.net 打开EXCEL ,关闭程序后,EXCEL进程仍然存在的问题
写在每段程序的末尾: ReleaseExcel(Excel) GC.Collect() 另有单独一个可调用过程: Sub ReleaseExcel(ByRef o As Object) System.Runtime.InteropServices.Marshal.ReleaseComObject(o) End Sub 在FORM关
2011-06-23 10:24:00
6903
原创 在vb.net 中判断input的press button是Cancel还是OK
From:http://www.developer.com/net/vb/article.php/1541851/VB-TIP-InputBox---OK-or-Cancel.htm Imports System.Runtime.InteropServices s_return = Microsoft.VisualBasic.Interaction.InputBox("请输入ClassID,中
2011-06-21 09:25:00
1197
原创 修改法定编号
先将数据导入至UD表,然后执行SQL更新。 update PUB.GLJrnHed SET LegalNumber=UPDATE WHERE EXISTS (SELECT 1 FROM PUB.UD07 WHERE UD07.Key3=GLJrnHed.JournalCode AND UD07.Number01=GLJrnHed.JournalNum AND UD07.Numb
2011-06-15 07:48:00
340
原创 更新错误问题
今天犯了个大错误,做UPDATE之前没有在测试环境做好测试,悲哀。在记忆里没有犯过这样的错误,除了刚刚入道的时候。这次犯错,本来我一直很小心的,大概太膨胀了,抛弃平时一贯的数据操作的严谨。引以为戒。
2011-06-14 14:42:00
550
原创 GTALK机器人
Gtalk机器人大全 ugmbbc发布于 2008-03-28 11:14:22| 19485 次阅读 字体:大 小 打印预览 感谢eran的投递 google talk是一个基于xmpp协议的开放式聊天软件,该协议与jabber兼容,极其有利于在其基础上开发第三方应用,这些应用一般都以机器人robot存在,今天我们就简单归纳一下,能够在gtalk上应用的robot。只要
2011-06-14 13:43:00
516
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人