【无标题】局域网内vb解析另外一台电脑上的文本文件

最新推荐文章于 2023-08-09 19:51:21 发布

DisFney

最新推荐文章于 2023-08-09 19:51:21 发布

阅读量632

点赞数

文章标签： mysql 数据库 vb.net

本文链接：https://blog.csdn.net/u014072347/article/details/122378101

版权

这篇博客展示了如何使用VB.NET在局域网内检查并读取指定路径的文本文件，然后根据文件内容执行SQL命令。文件被逐行解析，并对满足条件的行进行处理，将数据插入到MySQL数据库中。

摘要由CSDN通过智能技术生成

Dim mySql_Connection As MySqlConnection
Dim data_i As Integer = 1
mySql_Connection = mysql_net.Mysql_command
While True
mySql_Connection.Open()
'局域网内电脑路径
If My.Computer.FileSystem.FileExists("\\192.168.100.1\UPLOAD\upload.txt") Then

Dim fileReader = My.Computer.FileSystem.ReadAllText("\\192.168.100.1\UPLOAD\upload.txt")
               ’时间戳
Dim dt As DateTime = New DateTime(1970, 1, 1, 0, 0, 0, 0)
               ‘读取完放到其他路径
My.Computer.FileSystem.MoveFile("\\192.168.100.1\UPLOAD\upload.txt", "\\192.168.100.1\exchange3\ok\" & "upload_" & (Now().Ticks - dt.Ticks) / 100 & ".txt")
’一个文件可能有多条，以换行符区分
               Dim fileallline As String() = fileReader.Split(vbCrLf)