首 页
平面设计
编程开发
网页设计
Flash
办公软件
数据库
硬件学园
等级考试
多媒体
网络工程师
当前位置:
首页
>
VB.net教程
>
VB.Net 中写Log 的方法
最近在项目中有用到写Log 的功能.用VB.Net写的.如下:
1
Public
Sub
WriteLog(
ByVal
Msg
As
String
)
2
3
Dim
varAppPath
As
String
4
varAppPath
=
System.AppDomain.CurrentDomain.SetupInformation.ApplicationBase
+
"
log
"
5
System.IO.Directory.CreateDirectory(varAppPath)
6
7
Dim
head
As
String
8
head
=
System.DateTime.Now.Hour.ToString()
+
"
:
"
+
System.DateTime.Now.Minute.ToString()
9
head
=
head
+
"
:
"
+
System.DateTime.Now.Second.ToString()
+
"
:
"
+
System.DateTime.Now.Millisecond.ToString()
10
Msg
=
head
+
System.Environment.NewLine
+
Msg
+
System.Environment.NewLine
11
12
Dim
strDate
As
String
13
strDate
=
System.DateTime.Now.ToString(
"
yyyyMMdd
"
)
14
Dim
strFile
As
String
15
strFile
=
varAppPath
+
"
\
"
+
strDate
+
"
.log
"
16
Dim
SW
As
System.IO.StreamWriter
17
SW
=
New
System.IO.StreamWriter(strFile,
True
)
18
19
SW.WriteLine(Msg)
20
SW.Flush()
21
SW.Close()
22
23
End Sub
出处:https://www.cnblogs.com/andycai/archive/2009/05/04/1448547.html
栏目列表
最新更新
nodejs爬虫
Python正则表达式完全指南
爬取豆瓣Top250图书数据
shp 地图文件批量添加字段
爬虫小试牛刀(爬取学校通知公告)
【python基础】函数-初识函数
【python基础】函数-返回值
HTTP请求:requests模块基础使用必知必会
Python初学者友好丨详解参数传递类型
如何有效管理爬虫流量?
SQL SERVER中递归
2个场景实例讲解GaussDB(DWS)基表统计信息估
常用的 SQL Server 关键字及其含义
动手分析SQL Server中的事务中使用的锁
openGauss内核分析:SQL by pass & 经典执行
一招教你如何高效批量导入与更新数据
天天写SQL,这些神奇的特性你知道吗?
openGauss内核分析:执行计划生成
[IM002]Navicat ODBC驱动器管理器 未发现数据
初入Sql Server 之 存储过程的简单使用
这是目前我见过最好的跨域解决方案!
减少回流与重绘
减少回流与重绘
如何使用KrpanoToolJS在浏览器切图
performance.now() 与 Date.now() 对比
一款纯 JS 实现的轻量化图片编辑器
关于开发 VS Code 插件遇到的 workbench.scm.
前端设计模式——观察者模式
前端设计模式——中介者模式
创建型-原型模式
相关教程
python基础教程
软件开发
PHP教程
sql教程
vb.net教程
sql语句大全
asp.net教程
dreamweaver教程
javascript教程
flash教程
vb教程
计算机二级vfp
access教程
html5教程
C#教程
web前端
python入门教程
关于我们
--
广告服务
--
免责声明
--
本站帮助
-
友情链接
--
版权声明
--
联系我们
黑ICP备07002182号