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

1、用友軟件股份有限公司 EBU客開(kāi)管理總部 張?jiān)虏?2010年05月07日,U8二次開(kāi)發(fā)基礎(chǔ)講解,講演主題,VB應(yīng)用講解 XML應(yīng)用講解 SQL Sever應(yīng)用講解,VB應(yīng)用講解,VB文件介紹,窗體文件（*.Frm） 類(lèi)文件（*.Cls） 模塊文件（*.Bas） 自定義控件（*.Ctl） 屬性頁(yè)文件（*.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ī)范）,強(qiáng)制顯式聲明模塊中的所有變量,Option Explicit,變量一定要在前面聲明,Private Sub cmdCreateXML_Click() Dim oEle As IXMLDOMElement Dim oRoot As IXMLDOMElement Dim oNode As IXM

4、LDOMNode,注意縮進(jìn),Xml 標(biāo)準(zhǔn)元素 Xml 根節(jié)點(diǎn) Xml 標(biāo)準(zhǔn)節(jié)點(diǎn),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,適當(dāng)?shù)膿Q行,Private Sub cmdCreateXML_Click() Dim oEle As IXMLDOMElem

5、ent Do Code End Sub Private Sub AnotherSub,降低斷行標(biāo)示“_”的使用頻度，腳本換行增加換行標(biāo)示,sSql = “Select * From Table” & _ “Where Code =1001”,sSql = “Select * From Table”& VbCrlf sSql = sSql &“Where Code =1001”,VB應(yīng)用講解（規(guī)范）,每個(gè)函數(shù)段最好不要超過(guò)30行,Private Sub cmdCreateXML_Click() Dim oEle As IXMLDOMElement Do Code End Sub,30,VB應(yīng)用講

6、解（規(guī)范）,獲取Xml節(jié)點(diǎn)屬性值 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,足夠的注釋信息,最好有錯(cuò)誤處理，最好不要用On Error Resum Next,業(yè)務(wù)場(chǎng)景考慮全面，避免實(shí)時(shí)錯(cuò)誤,聲明參數(shù)是按地址傳入還是數(shù)值,功能單一，就干一件事情,講演主題,VB應(yīng)用講解 XML應(yīng)用講解 SQL Sever應(yīng)用講解,Node節(jié)點(diǎn)，類(lèi)似于數(shù)組，有文本屬性 Element元素，帶屬性的節(jié)點(diǎn) Attribute 屬性，類(lèi)似于集合，不可重復(fù) Text文本，不具備任何擴(kuò)展屬性 備注 DocumentElement 根節(jié)點(diǎn)，Dom只可以有一個(gè)根節(jié)點(diǎn)，該節(jié)點(diǎn)為Element屬性,XML應(yīng)用講解,XML介紹,XML應(yīng)用講解,

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

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

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

11、XXX 約束標(biāo)準(zhǔn)前綴： EF_項(xiàng)目_CK_XXXX,SQL應(yīng)用講解,常用命令,SP_Who 檢查進(jìn)程 SP_Lock檢查鎖 Kill Sp_ID 刪除進(jìn)程 DBCC InputBuffer(SP_ID)檢查進(jìn)程內(nèi)容 DBCC SHRINKDATABASE 收縮數(shù)據(jù)庫(kù) DBCC SHRINKDB收縮數(shù)據(jù)庫(kù) DBCC SHRINKFILE收縮數(shù)據(jù)和日志文件 DBCC SHOWCONTIG 掃描表密度 DBCC REINDEX 重建數(shù)據(jù)庫(kù)索引 DBCC INDEXDEFRAG 重建數(shù)據(jù)庫(kù)索引,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)用講解,編寫(xiě)規(guī)范,盡量不要超過(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、前后臺(tái)交互次數(shù) 沒(méi)有必要的數(shù)據(jù)不要取到前臺(tái) 避免客戶(hù)端海量運(yùn)算 減少I(mǎi)N的使用 避免使用Union 腳本中盡量避免使用游標(biāo)（尤其不能游標(biāo)嵌套） 存儲(chǔ)過(guò)程功能清晰，減少業(yè)務(wù)分支查詢(xún)，降低預(yù)編譯時(shí)間 關(guān)鍵業(yè)務(wù)字段使用索引處理 多使用整形數(shù)據(jù)判斷，避免布爾值判斷 整理數(shù)據(jù)表碎片，提升索引效率,SQL應(yīng)用講解,效率問(wèn)題,索引失效,比較字段數(shù)據(jù)類(lèi)型轉(zhuǎn)換或運(yùn)算 比較字段內(nèi)容少于組合索引內(nèi)容 對(duì)Null值進(jìn)行比較 比較字段表內(nèi)內(nèi)容比較一致，系統(tǒng)沒(méi)有建立索引 使用“”來(lái)進(jìn)行索引字段比較 使用“IN”來(lái)進(jìn)行條件處理 索引表不連續(xù)，跨頁(yè)檢索,SQL應(yīng)用講解,SQL變量拼接時(shí)會(huì)向定義最嚴(yán)格的類(lèi)型進(jìn)行轉(zhuǎn)換 組織視圖時(shí)

16、避免使用*來(lái)降低工作量 使用中間表處理時(shí),臨時(shí)用表應(yīng)該判斷是否存在 創(chuàng)建表和視圖時(shí),一定要判斷是否已經(jīng)存在 注意Null,常見(jiàn)錯(cuò)誤,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不可以使用“=”來(lái)判斷，只能使用“IS” Null和任何值比較都會(huì)返回“False” （開(kāi)關(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)用講解,事件探查器,默認(rèn)事件： Sql 2000 Audit Login,Audit Logout, Exist