我们专注攀枝花网站设计 攀枝花网站制作 攀枝花网站建设
成都网站建设公司服务热线:400-028-6601

网站建设知识

十年网站开发经验 + 多家企业客户 + 靠谱的建站团队

量身定制 + 运营维护+专业推广+无忧售后,网站问题一站解决

VB.NET怎么写Log方法

小编给大家分享一下VB.NET怎么写Log方法,相信大部分人都还不怎么了解,因此分享这篇文章给大家参考一下,希望大家阅读完这篇文章后大有收获,下面让我们一起去了解一下吧!

站在用户的角度思考问题,与客户深入沟通,找到榆阳网站设计与榆阳网站推广的解决方案,凭借多年的经验,让设计与互联网技术结合,创造个性化、用户体验好的作品,建站类型包括:成都网站设计、成都做网站、企业官网、英文网站、手机端网站、网站推广、域名注册、虚拟空间、企业邮箱。业务覆盖榆阳地区。

最近在项目中有用到VB.NET写Log方法的功能.具体代码如下:

Code

  1. Public Sub WriteLog()Sub 
    WriteLog(ByVal Msg As String)  

  2. Dim varAppPath As String  

  3. varAppPath = System.AppDomain.
    CurrentDomain.SetupInformation.
    ApplicationBase + "log"  

  4. System.IO.Directory.CreateDirectory
    (varAppPath)  

  5. Dim head As String  

  6. head = System.DateTime.Now.Hour.
    ToString() + ":" + System.DateTime.
    Now.Minute.ToString()  

  7. headhead = head + ":" + System.DateTime.
    Now.Second.ToString() + ":" + 
    System.DateTime.Now.Millisecond.ToString()  

  8. Msg = head + System.Environment.
    NewLine + Msg + System.Environment.NewLine  

  9. Dim strDate As String  

  10. strDate = System.DateTime.Now.
    ToString("yyyyMMdd")  

  11. Dim strFile As String  

  12. strFile = varAppPath + "\" + 
    strDate + ".log"  

  13. Dim SW As System.IO.StreamWriter  

  14. SW = New System.IO.StreamWriter
    (strFile, True)  

  15. SW.WriteLine(Msg)  

  16. SW.Flush()  

  17. SW.Close()  

  18. End Sub 

以上是“VB.NET怎么写Log方法”这篇文章的所有内容,感谢各位的阅读!相信大家都有了一定的了解,希望分享的内容对大家有所帮助,如果还想学习更多知识,欢迎关注创新互联行业资讯频道!


文章标题:VB.NET怎么写Log方法
分享URL:http://mswzjz.cn/article/pdsgoo.html

其他资讯