vb.net日志,VBSE日志

在vb.net 中,記錄系統(tǒng)錯誤日志這個功能怎么實(shí)現(xiàn)

Public Sub ShowError(strModule As String, strProcedure As String, lngErrorNumber As Long, strErrorDescription As String, showMsg As String)

10年積累的網(wǎng)站設(shè)計制作、成都網(wǎng)站制作經(jīng)驗(yàn)，可以快速應(yīng)對客戶對網(wǎng)站的新想法和需求。提供各種問題對應(yīng)的解決方案。讓選擇我們的客戶得到更好、更有力的網(wǎng)絡(luò)服務(wù)。我雖然不認(rèn)識你，你也不認(rèn)識我。但先網(wǎng)站制作后付款的網(wǎng)站建設(shè)流程，更有臨淄免費(fèi)網(wǎng)站建設(shè)讓你可以放心的選擇與我們合作。

'

'錯誤處理中心過程,寫數(shù)據(jù)庫日志表或?qū)懭罩疚募?/p>

'

'strModule '模塊名稱

'strProcedure '過程名稱

'lngErrorNumber '錯誤ID號

'strErrorDescription '錯誤描述

'showMsg '是否顯示本過程內(nèi)錯誤顯示信息(值:"Y" or "N")

'Error表結(jié)構(gòu)(f001 (Date)發(fā)生時間, f002 (nvarchar50)模塊名稱, f003 (nvarchar50)過程名稱, f004 (nvarchar50)錯誤ID號, _

f005 (nvarchar300)錯誤描述,f006 (nvarchar50)版 本 號, f007 (nvarchar50)用戶名稱, f008 (nvarchar50)網(wǎng)卡地址

'ErrorCode表結(jié)構(gòu) f001 (nvarchar20)錯誤代碼, f002 (nvarchar255)錯誤信息, f003 (numeric9)錯誤級別

' 級別說明: '10'以下,一般錯誤,不影響操作

' '11-20',嚴(yán)重錯誤,不能操作,程序執(zhí)行退出

On Error GoTo ErrorHandle

Dim strMessage As String

Dim strCaption As String

Dim sVer As String

Dim intLogFile As Integer

Dim Res As New ADODB.Recordset

Dim ResErrorCode As New ADODB.Recordset

Dim strSQL As String

'對應(yīng)錯誤號,從ErrorCode表中找到對應(yīng)的錯誤信息,0-1000 錯誤號保留給VB

DBOpen ResErrorCode, "select * from errorcode where f001='" lngErrorNumber "'"

If Not (ResErrorCode.EOF Or ResErrorCode.BOF) Then

strMessage = ResErrorCode.Fields("f002")

If ResErrorCode.Fields("f003") 10 Then

MsgBox "產(chǎn)生一個嚴(yán)重錯誤,可能影響到系統(tǒng)的可操作性,請立即聯(lián)系本系統(tǒng)開發(fā)人員!", vbCritical, "嚴(yán)重錯誤"

End If

End If

'寫錯誤入文件----------------------------

intLogFile = FreeFile

Open App.Path "\" strIni.LogFile For Append As #intLogFile

Print #intLogFile, "***錯誤"; VBA.Now "*** " "Version:" _

str$(App.Major) "." str$(App.Minor) "." Format(App.Revision, "0000")

Print #intLogFile, "Error: " lngErrorNumber

Print #intLogFile, "Description: " strErrorDescription

Print #intLogFile, "Module: " strModule

Print #intLogFile, "Procedure: " strProcedure

Print #intLogFile, ""

Close #intLogFile

If Len(strMessage) 2 Then strErrorDescription = strMessage

strMessage = "錯誤: " "(" lngErrorNumber ")" strErrorDescription vbCrLf vbCrLf _

"模塊:" strModule "; 過程:" strProcedure

sVer = Trim(str$(App.Major) "." str$(App.Minor) "." _

Format(App.Revision, "0000"))

strCaption = "錯誤 Version: " sVer

'寫錯誤入數(shù)據(jù)庫表--------------------------

strSQL = "insert into error(f001,f002,f003,f004,f005,f006,f007,f008) values(" _

DateFmtB VBA.Now DateFmtE "," _

IIf(Len(Trim(strModule)) = 0, "null", "'" strModule "'") "," _

IIf(Len(Trim(strProcedure)) = 0, "null", "'" strProcedure "'") "," _

IIf(Len(Trim(lngErrorNumber)) = 0, "null", "'" lngErrorNumber "'") "," _

IIf(Len(Trim(strErrorDescription)) = 0, "null", "'" Replace(strErrorDescription, "'", "") "'") "," _

IIf(Len(Trim(sVer)) = 0, "null", "'" sVer "'") "," _

IIf(Len(Trim(sUserName)) = 0, "null", "'" sUserName "'") "," _

IIf(Len(Trim(sVer)) = 0, "null", "'" EthernetNO "'") ")"

Cn.Execute strSQL

'是否顯示未知錯誤信息

If Trim(UCase(showMsg)) = "Y" Then MsgBox strMessage, vbCritical, strCaption

PROC_EXIT:

Set Res = Nothing

Set ResErrorCode = Nothing

Exit Sub

ErrorHandle:

Resume Next

請問誰知道怎么用vb.net 打印.log日志文件， 用代碼寫的，謝謝了，急用

Dim sw As StreamWriter = New StreamWriter（“c:\xxxxx.log”， True） 'true是指以追加的方式打開指定文件

For i = 0 To j

temp = i.ToString

sw.WriteLine（temp）

sw.Flush（）

Next

sw.Close（）

sw = Nothing

請教高手，如何用vb實(shí)現(xiàn)“使用日志”？

很多種方法，最常用的一是用文本文件或數(shù)據(jù)庫記錄，二是調(diào)用API函數(shù)直接寫入系統(tǒng)日志或應(yīng)用程序日志

中國有哪幾種編程語言?

目前比較流行的編程語言：

1、Ruby

Ruby于1993年2月24日開始編寫至1995年12月才正式公開發(fā)布，一種為簡單快捷面向?qū)ο缶幊潭鴦?chuàng)的腳本語言，Ruby是一個語法像Smalltalk一樣完全面向?qū)ο?、腳本執(zhí)行、又有Perl強(qiáng)大的文字處理功能的編程語言。

2、Perl

Perl ，一般被稱為“實(shí)用報表提取語言”（Practical Extraction and Report Language）。他于1987年12月18日發(fā)表。Perl借取了C、sed、awk、shell ing以及很多其他程序語言的特性。其中最重要的特性是它內(nèi)部集成了正則表達(dá)式的功能，以及巨大的第三方代碼庫CPAN。簡而言之，Perl像C一樣強(qiáng)大，象awk、sed等腳本描述語言一樣方便。

3、SWIFT

SWIFT，蘋果于2014年WWDC（蘋果開發(fā)者大會）發(fā)布的新開發(fā)語言，可與Object-C共同運(yùn)行于MAC OS和iOS平臺，用于搭建基于蘋果平臺的應(yīng)用程序。

4、php

PHP，是英文超文本預(yù)處理語言Hypertext Preprocessor的縮寫。PHP 是一種 HTML 內(nèi)嵌式的語言，是一種在服務(wù)器端執(zhí)行的嵌入HTML文檔的腳本語言，語言的風(fēng)格有類似于C語言，被廣泛地運(yùn)用，目前版本已經(jīng)更新到5.4.23，由于其學(xué)習(xí)成本低，開發(fā)效率高，擴(kuò)展函數(shù)豐富，成為了最流行的服務(wù)器端腳本語言。

5、Python

Python（KK 英語發(fā)音：/?pa?θ?n/）是一種面向?qū)ο蟆⒅弊g式計算機(jī)程序設(shè)計語言。也是一種功能強(qiáng)大而完善的通用型語言，已經(jīng)具有十多年的發(fā)展歷史，成熟且穩(wěn)定。Python 具有腳本語言中最豐富和強(qiáng)大的類庫，足以支持絕大多數(shù)日常應(yīng)用。 Python語法簡捷而清晰，具有豐富和強(qiáng)大的類庫。它常被昵稱為膠水語言，它能夠很輕松的把用其他語言制作的各種模塊（尤其是C/C++）輕松地聯(lián)結(jié)在一起。Python的名字來源于一個喜劇。也許最初設(shè)計Python這種語言的人并沒有想到Python會在工業(yè)和科研上獲得如此廣泛的使用。

6、c#

C#是微軟公司發(fā)布的一種面向?qū)ο蟮摹⑦\(yùn)行于.NET Framework之上的高級程序設(shè)計語言。并定于在微軟職業(yè)開發(fā)者論壇(PDC)上登臺亮相。C#是微軟公司研究員Anders Hejlsberg的最新成果。C#看起來與Java有著驚人的相似；它包括了諸如單一繼承、接口、與Java幾乎同樣的語法和編譯成中間代碼再運(yùn)行的過程。但是C#與Java有著明顯的不同，它借鑒了Delphi的一個特點(diǎn)，與COM（組件對象模型）是直接集成的，而且它是微軟公司 .NET windows網(wǎng)絡(luò)框架的主角。

7、java

ava是一ava是一種由Netscape的Live發(fā)展而來的原型化繼承的面向?qū)ο蟮膭討B(tài)類型的區(qū)分大小寫的客戶端腳本語言，主要目的是為了解決服務(wù)器終端語言，比如Perl，遺留的速度問題。當(dāng)時服務(wù)端需要對數(shù)據(jù)進(jìn)行驗(yàn)證，由于網(wǎng)絡(luò)速度相當(dāng)緩慢，只有28.8kbps，驗(yàn)證步驟浪費(fèi)的時間太多。于是Netscape的瀏覽器Navigator加入了Java，提供了數(shù)據(jù)驗(yàn)證的基本功能。所以，Java 被數(shù)百萬計的網(wǎng)頁用來改進(jìn)設(shè)計、驗(yàn)證表單、檢測瀏覽器、創(chuàng)建cookies，以及更多的應(yīng)用。

推薦下我的前端群：524262608，不管你是小白還是大牛，小編我都挺歡迎，不定期分享干貨，包括我自己整理的一份2017最新的前端資料和零基礎(chǔ)入門教程，歡迎初學(xué)和進(jìn)階中的小伙伴。

8、C++

C++是一種面向?qū)ο蟮挠嬎銠C(jī)程序設(shè)計語言。C++這個詞在中國大陸的程序員圈子中通常被讀做“C加加”，而西方的程序員通常讀做“C plus plus”，“CPP”。 它是一種使用非常廣泛的計算機(jī)編程語言。C++是一種靜態(tài)數(shù)據(jù)類型檢查的、支持多重編程范式的通用程序設(shè)計語言。它支持過程化程序設(shè)計、數(shù)據(jù)抽象、面向?qū)ο蟪绦蛟O(shè)計、泛型程序設(shè)計等多種程序設(shè)計風(fēng)格。

9、C

C語言是一種計算機(jī)程序設(shè)計語言，它既具有高級語言的特點(diǎn)，又具有匯編語言的特點(diǎn)。它由美國貝爾研究所的D.M.Ritchie于1972年推出，1978年后，C語言已先后被移植到大、中、小及微型機(jī)上，它可以作為工作系統(tǒng)設(shè)計語言，編寫系統(tǒng)應(yīng)用程序，也可以作為應(yīng)用程序設(shè)計語言，編寫不依賴計算機(jī)硬件的應(yīng)用程序。它的應(yīng)用范圍廣泛，具備很強(qiáng)的數(shù)據(jù)處理能力，不僅僅是在軟件開發(fā)上，而且各類科研都需要用到C語言，適于編寫系統(tǒng)軟件，三維，二維圖形和動畫，具體應(yīng)用比如單片機(jī)以及嵌入式系統(tǒng)開發(fā)。

10、java

Java是一種可以撰寫跨平臺應(yīng)用程序的面向?qū)ο蟮某绦蛟O(shè)計語言。Java 技術(shù)具有卓越的通用性、高效性、平臺移植性和安全性，廣泛應(yīng)用于PC、數(shù)據(jù)中心、游戲控制臺、科學(xué)超級計算機(jī)、移動電話和互聯(lián)網(wǎng)，同時擁有全球最大的開發(fā)者專業(yè)社群。

網(wǎng)頁標(biāo)題：vb.net日志,VBSE日志
當(dāng)前地址：http://m.kartarina.com/article4/hegcoe.html

成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián)，為您提供網(wǎng)站導(dǎo)航、關(guān)鍵詞優(yōu)化、靜態(tài)網(wǎng)站、網(wǎng)站改版、電子商務(wù)、品牌網(wǎng)站建設(shè)

廣告

聲明：本網(wǎng)站發(fā)布的內(nèi)容（圖片、視頻和文字）以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主，如果涉及侵權(quán)請盡快告知，我們將會在第一時間刪除。文章觀點(diǎn)不代表本網(wǎng)站立場，如需處理請聯(lián)系客服。電話：028-86922220；郵箱：631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載，或轉(zhuǎn)載時需注明來源： 創(chuàng)新互聯(lián)