U8二次開發(fā)-基礎(chǔ)篇

1、用友軟件股份有限公司 EBU客開管理總部 張月昌 2010年05月07日,U8二次開發(fā)基礎(chǔ)講解,講演主題,VB應(yīng)用講解 XML應(yīng)用講解 SQL Sever應(yīng)用講解,VB應(yīng)用講解,VB文件介紹,窗體文件（*.Frm） 類文件（*.Cls） 模塊文件（*.Bas） 自定義控件（*.Ctl） 屬性頁文件（*.Pag） 窗體資源文件（*.Frx） 資源文件（*.Res） 工程文件（*.Vbp） 工程組文件（*.Vbg） 工程配置文件（*.Vbw） 代碼管理文件（*.Scc） 日志文件（*.Log）,VB應(yīng)用講解(Frm),VERSION 5.00 Begin VB.Form Form1 Caption

2、 = 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 End Attribute VB_N

3、ame = Form1 Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False,VB應(yīng)用講解（規(guī)范）,強制顯式聲明模塊中的所有變量,Option Explicit,變量一定要在前面聲明,Private Sub cmdCreateXML_Click() Dim oEle As IXMLDOMElement Dim oRoot As IXMLDOMElement Dim oNode As IXM

4、LDOMNode,注意縮進,Xml 標準元素 Xml 根節(jié)點 Xml 標準節(jié)點,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,適當?shù)膿Q行,Private Sub cmdCreateXML_Click() Dim oEle As IXMLDOMElem

5、ent 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應(yīng)用講解（規(guī)范）,每個函數(shù)段最好不要超過30行,Private Sub cmdCreateXML_Click() Dim oEle As IXMLDOMElement Do Code End Sub,30,VB應(yīng)用講

6、解（規(guī)范）,獲取Xml節(jié)點屬性值 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 Endif ErrExist: GetXml

7、Attr = “” 取數(shù)失敗，返回空串 End Function,足夠的注釋信息,最好有錯誤處理，最好不要用On Error Resum Next,業(yè)務(wù)場景考慮全面，避免實時錯誤,聲明參數(shù)是按地址傳入還是數(shù)值,功能單一，就干一件事情,講演主題,VB應(yīng)用講解 XML應(yīng)用講解 SQL Sever應(yīng)用講解,Node節(jié)點，類似于數(shù)組，有文本屬性 Element元素，帶屬性的節(jié)點 Attribute 屬性，類似于集合，不可重復 Text文本，不具備任何擴展屬性 備注 DocumentElement 根節(jié)點，Dom只可以有一個根節(jié)點，該節(jié)點為Element屬性,XML應(yīng)用講解,XML介紹,XML應(yīng)用講解,

8、XML介紹 節(jié)點,SelectSingleNode selectNodes firstChild lastChild nextSibling appendChild removeChild text,XML應(yīng)用講解,XML介紹 屬性,attributes getAttributeNode getAttribute setAttribute removeAttribute text,XML應(yīng)用講解,XML字符轉(zhuǎn)義,有些特殊字符無法在Xml中直接保存，會使用轉(zhuǎn)義字符進行描述。 該描述會影響XML的保存內(nèi)容，但是顯示仍然會按照原始內(nèi)容顯示，而非轉(zhuǎn)義內(nèi)容。 VB中對屬性等賦值取數(shù)直接使用特殊字符，只是

9、影響Xml的保存文件。 但是如果對Xml的Xml屬性直接操作時就是轉(zhuǎn)義字符了。,XML應(yīng)用講解,XPath,使用“/”進行路徑操作，如：Nd/Itm/Name 使用“”進行謂詞判斷，如：NdItm/Name 使用“”對屬性進行判斷，如：ItemName = a 使用“/”獲取dom全路徑下的所有節(jié)點內(nèi)容 使用“*”進行模糊匹配 XML嚴格區(qū)分大小寫，書寫時一定要注意,XML應(yīng)用講解,Schema, ,講演主題,VB應(yīng)用講解 XML應(yīng)用講解 SQL Sever應(yīng)用講解,SQL應(yīng)用講解,系統(tǒng)數(shù)據(jù)庫和系統(tǒng)表,Mastermaster是數(shù)據(jù)庫的最重要的數(shù)據(jù)庫，聯(lián)系著其他的數(shù)據(jù)庫，并記錄著用戶數(shù)據(jù)！相當

10、于超級管理員的賬戶 Model 模版數(shù)據(jù)庫 Msdb Sql內(nèi)部使用，一般用于計劃作業(yè)和數(shù)據(jù)庫郵件 tempdb臨時數(shù)據(jù)庫 pubs示范數(shù)據(jù)庫,Sysobjects 數(shù)據(jù)庫對象表 Syscolumns數(shù)據(jù)庫對象字段表 sysProcesses(master)數(shù)據(jù)庫系統(tǒng)進程,SQL應(yīng)用講解,常用對象,數(shù)據(jù)表標準前綴：EF_項目_XXXX 或 EF_項目_T_XXXX 字段 視圖標準前綴： EF_項目_V_XXXX 存儲過程標準前綴： EF_項目_P_XXXX 函數(shù)標準前綴： EF_項目_F_XXXX 觸發(fā)器標準前綴： EF_項目_Tri_XXXX 自定義變量 索引標準前綴： EF_項目_IX_X

11、XXX 約束標準前綴： EF_項目_CK_XXXX,SQL應(yīng)用講解,常用命令,SP_Who 檢查進程 SP_Lock檢查鎖 Kill Sp_ID 刪除進程 DBCC InputBuffer(SP_ID)檢查進程內(nèi)容 DBCC SHRINKDATABASE 收縮數(shù)據(jù)庫 DBCC SHRINKDB收縮數(shù)據(jù)庫 DBCC SHRINKFILE收縮數(shù)據(jù)和日志文件 DBCC SHOWCONTIG 掃描表密度 DBCC REINDEX 重建數(shù)據(jù)庫索引 DBCC INDEXDEFRAG 重建數(shù)據(jù)庫索引,SQL應(yīng)用講解,常用命令,Select Top 10 * From XXX With(nolock) Whe

12、re 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.VouchName, B.Code, C.Name, B.Num, B.Money F

13、rom 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 + INNER Join C ON A.ID = C.ID And B.Co

14、de = C.Code+ Where A.VouDate Between 2010-5-1 And 2010-5-31,SQL應(yīng)用講解,編寫規(guī)范,盡量不要超過五層,關(guān)鍵字前換行,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 And 2010-5-31,SQL變量賦值盡量不要拼很多的串,使用臟讀,減少

15、前后臺交互次數(shù) 沒有必要的數(shù)據(jù)不要取到前臺 避免客戶端海量運算 減少IN的使用 避免使用Union 腳本中盡量避免使用游標（尤其不能游標嵌套） 存儲過程功能清晰，減少業(yè)務(wù)分支查詢，降低預編譯時間 關(guān)鍵業(yè)務(wù)字段使用索引處理 多使用整形數(shù)據(jù)判斷，避免布爾值判斷 整理數(shù)據(jù)表碎片，提升索引效率,SQL應(yīng)用講解,效率問題,索引失效,比較字段數(shù)據(jù)類型轉(zhuǎn)換或運算 比較字段內(nèi)容少于組合索引內(nèi)容 對Null值進行比較 比較字段表內(nèi)內(nèi)容比較一致，系統(tǒng)沒有建立索引 使用“”來進行索引字段比較 使用“IN”來進行條件處理 索引表不連續(xù)，跨頁檢索,SQL應(yīng)用講解,SQL變量拼接時會向定義最嚴格的類型進行轉(zhuǎn)換 組織視圖時

16、避免使用*來降低工作量 使用中間表處理時,臨時用表應(yīng)該判斷是否存在 創(chuàng)建表和視圖時,一定要判斷是否已經(jīng)存在 注意Null,常見錯誤,T1,T2,V1,CREATE View V1 AS Select T1.*,T2.* From T1,T2,Declare sValue nvarchar(50) Set sValue = ABC Select sValue = Name From A Where 1 = 2 Set sValue = (Select Name From A Where 1 = 2),SQL應(yīng)用講解,NULL,Null不可以使用“=”來判斷，只能使用“IS” Null和任何值比較都會返回“False” （開關(guān)：Set ANSI_NULLS OFF）,Case When,Case When a = 1 Then 3 Else Case When a = 2 Then 4 End End Case a When 1 Then 3 When 2 Then 4 End,=,ABC,Null,空記錄集,SQL應(yīng)用講解,事件探查器,默認事件： Sql 2000 Audit Login,Audit Logout, Exist