U8二次开发-基础篇

《U8二次开发-基础篇》由会员分享，可在线阅读，更多相关《U8二次开发-基础篇（25页珍藏版）》请在金锄头文库上搜索。

1、用友软件股份有限公司 EBU客开管理总部 张月昌 2010年05月07日,U8二次开发基础讲解,讲演主题,VB应用讲解 XML应用讲解 SQL Sever应用讲解,VB应用讲解,VB文件介绍,窗体文件 （*.Frm） 类文件 （*.Cls） 模块文件 （*.Bas） 自定义控件 （*.Ctl） 属性页文件 （*.Pag） 窗体资源文件 （*.Frx） 资源文件 （*.Res） 工程文件 （*.Vbp） 工程组文件 （*.Vbg） 工程配置文件 （*.Vbw） 代码管理文件 （*.Scc） 日志文件 （*.Log）,VB应用讲解(Frm),VERSION 5.00 Begin VB.Form F

2、orm1 Caption = “Form1“ ClientHeight = 3195 ClientLeft = 60 ClientTop = 345 ClientWidth = 4680 LinkTopic = “Form1“ ScaleHeight = 3195 ScaleWidth = 4680 StartUpPosition = 3 窗口缺省 Begin VB.CommandButton cmdCreateXML Caption = “CreateXml“ Height = 495 Left = 1680 TabIndex = 1 Top = 1920 Width = 1455 End

3、End Attribute VB_Name = “Form1“ Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False,VB应用讲解（规范）,强制显式声明模块中的所有变量,Option Explicit,变量一定要在前面声明,Private Sub cmdCreateXML_Click() Dim oEle As IXMLDOMElement Dim oRoot As IXMLDOMElem

4、ent Dim oNode As IXMLDOMNode,注意缩进,Xml 标准元素 Xml 根节点 Xml 标准节点,If A = B Then A = A + 1 End IF,While A 100 A = A + 1 Wend,For i = 1 to 100 A = A + 1 Next,Private Sub Test() Msgbox “This is a test sub” Next,Select Case Val(x) Case 1 Print “Value Is 1” End Select,适当的换行,Private Sub cmdCreateXML_Click() Dim

5、 oEle As IXMLDOMElement Do Code End Sub Private Sub AnotherSub,降低断行标示“_”的使用频度，脚本换行增加换行标示,sSql = “Select * From Table” & _ “Where Code =1001”,sSql = “Select * From Table”& VbCrlf sSql = sSql &“Where Code =1001”,VB应用讲解（规范）,每个函数段最好不要超过30行,Private Sub cmdCreateXML_Click() Dim oEle As IXMLDOMElement Do C

6、ode End Sub,30,VB应用讲解（规范）,获取Xml节点属性值 Private Function GetXmlAttr(Byref eItem As XmlElement, Byval sName as String) As String On Error Goto ErrExist Dim vValue As Variant 获取的Xml属性值 vValue = eItem.GetAttribute（sName) If IsNull(vValue) Then 判断该属性是否存在 GetXmlAttr = “” 不存在，返回空串 Else GetXmlAttr = vValue En

7、dif ErrExist: GetXmlAttr = “” 取数失败，返回空串 End Function,足够的注释信息,最好有错误处理，最好不要用On Error Resum Next,业务场景考虑全面，避免实时错误,声明参数是按地址传入还是数值,功能单一，就干一件事情,讲演主题,VB应用讲解 XML应用讲解 SQL Sever应用讲解,Node 节点，类似于数组，有文本属性 Element 元素，带属性的节点 Attribute 属性，类似于集合，不可重复 Text 文本，不具备任何扩展属性 备注 DocumentElement 根节点，Dom只可以有一个根节点，该节点为Element属性

8、,XML应用讲解,XML介绍,XML应用讲解,XML介绍 节点,SelectSingleNode selectNodes firstChild lastChild nextSibling appendChild removeChild text,XML应用讲解,XML介绍 属性,attributes getAttributeNode getAttribute setAttribute removeAttribute text,XML应用讲解,XML字符转义,有些特殊字符无法在Xml中直接保存，会使用转义字符进行描述。 该描述会影响XML的保存内容，但是显示仍然会按照原始内容显示，而非转义内容。

9、 VB中对属性等赋值取数直接使用特殊字符，只是影响Xml的保存文件。 但是如果对Xml的Xml属性直接操作时就是转义字符了。,XML应用讲解,XPath,使用“/”进行路径操作，如：Nd/Itm/Name 使用“”进行谓词判断，如：NdItm/Name 使用“”对属性进行判断，如：ItemName = a 使用“/”获取dom全路径下的所有节点内容 使用“*”进行模糊匹配 XML严格区分大小写，书写时一定要注意,XML应用讲解,Schema,讲演主题,VB应用讲解 XML应用讲解 SQL Sever应用讲解,SQL应用讲解,系统数据库和系统表,Master master是数据库的最重要的数据库

10、，联系着其他的数据库，并记录着用户数据！相当于超级管理员的账户 Model 模版数据库 Msdb Sql内部使用，一般用于计划作业和数据库邮件 tempdb 临时数据库 pubs 示范数据库,Sysobjects 数据库对象表 Syscolumns 数据库对象字段表 sysProcesses(master) 数据库系统进程,SQL应用讲解,常用对象,数据表 标准前缀：EF_项目_XXXX 或 EF_项目_T_XXXX 字段 视图 标准前缀： EF_项目_V_XXXX 存储过程 标准前缀： EF_项目_P_XXXX 函数 标准前缀： EF_项目_F_XXXX 触发器 标准前缀： EF_项目_Tr

11、i_XXXX 自定义变量 索引 标准前缀： EF_项目_IX_XXXX 约束 标准前缀： EF_项目_CK_XXXX,SQL应用讲解,常用命令,SP_Who 检查进程 SP_Lock 检查锁 Kill Sp_ID 删除进程 DBCC InputBuffer(SP_ID) 检查进程内容 DBCC SHRINKDATABASE 收缩数据库 DBCC SHRINKDB 收缩数据库 DBCC SHRINKFILE 收缩数据和日志文件 DBCC SHOWCONTIG 扫描表密度 DBCC REINDEX 重建数据库索引 DBCC INDEXDEFRAG 重建数据库索引,SQL应用讲解,常用命令,Sele

12、ct Top 10 * From XXX With(nolock) Where XX = YY Sum Max Min Avg Group By xx,yy Having Sum(xx)10000 Union (All) Insert Into A (a,b,c) Values(a,b,c) Delete A Where a = a Select A.* Into #A Where a = a Left Join Right Join Inner Join Full Join Cross Join (Select * From A,B),Select A.VouchCode, A.VouchN

13、ame, B.Code, C.Name, B.Num, B.Money From A With(nolock) Left Join B With(nolock) ON A.ID = B.ID INNER Join C With(nolock) ON A.ID = C.ID And B.Code = C.Code Where A.VouDate Between 2010-5-1 And 2010-5-31 Set SQL = Select A.VouchCode, A.VouchName, B.Code, C.Name+ From A + Left Join B ON A.ID = B.ID +

14、 INNER Join C ON A.ID = C.ID And B.Code = C.Code+ Where A.VouDate Between 2010-5-1 And 2010-5-31,SQL应用讲解,编写规范,尽量不要超过五层,关键字前换行,Set SQL = Select A.VouchCode, A.VouchName, B.Code, C.Name From A Left Join B ON A.ID = B.ID INNER Join C ON A.ID = C.ID And B.Code = C.Code Where A.VouDate Between 2010-5-1 A

15、nd 2010-5-31,SQL变量赋值尽量不要拼很多的串,使用脏读,减少前后台交互次数 没有必要的数据不要取到前台 避免客户端海量运算 减少IN的使用 避免使用Union 脚本中尽量避免使用游标（尤其不能游标嵌套） 存储过程功能清晰，减少业务分支查询，降低预编译时间 关键业务字段使用索引处理 多使用整形数据判断，避免布尔值判断 整理数据表碎片，提升索引效率,SQL应用讲解,效率问题,索引失效,比较字段数据类型转换或运算 比较字段内容少于组合索引内容 对Null值进行比较 比较字段表内内容比较一致，系统没有建立索引 使用“”来进行索引字段比较 使用“IN”来进行条件处理 索引表不连续，跨页检索,SQL应用讲解,SQL变量拼接时会向定义最严格的类型进行转换 组织视图时避免使用*来降低工作量 使用中间表处理时,临时用表应该判断是否存在 创建表和视图时,一定要判断是否已经存在 注意Null,常见错误,T1,T2,V1,CREATE View V1 AS Select T1.*,T2.* From T1,T2,Declare sValue nvarchar(50) Set sValue = ABC