使用ADODB.Stream对象读文本文件

最新推荐文章于 2025-05-18 15:45:58 发布
最新推荐文章于 2025-05-18 15:45:58 发布
阅读量2.3k 收藏
点赞数
分类专栏： Visual Basic 文章标签： function
本文介绍了一个使用VBA编写的函数ReadTextFile，该函数可以指定文件名及字符集来读取文本文件的内容。通过创建ADODB.Stream对象并设置其类型为文本，可以进一步加载指定文件的数据，并从中读取文本。

摘要生成于 C知道 ，由 DeepSeek-R1 满血版支持， 前往体验 >

Function ReadTextFile(FileName, CharSet)
Const adTypeText = 2

'Create Stream object
Dim BinaryStream
Set BinaryStream = CreateObject("ADODB.Stream")

'Specify stream type - we want To get binary data.
BinaryStream.Type = adTypeText

'Specify charset For the source text (unicode) data.
If Len(CharSet) > 0 Then
BinaryStream.CharSet = CharSet
End If

'Open the stream
BinaryStream.Open

'Load the file data from disk To stream object
BinaryStream.LoadFromFile FileName

'Open the stream And get binary data from the object
ReadTextFile = BinaryStream.ReadText
End Function

 
关于用ADODB.Stream读写文本文件的一些问题
ch_scofield的专栏
05-26 1774
文件内容读取.Function LoadFile(ByVal File)    Dim objStream    On Error Resume Next    Set objStream = Server.CreateObject("ADODB.Stream")    If Err.Number=-2147221005 Then        Response
adodb.Stream读写文件
sxqvb的专栏
08-19 2273
adodb.Stream读文本文件Private Sub Command1_Click()    Dim myData() As Byte    myFile = "c:/VRLServer.txt"    Dim adoSrm As Object    Set adoSrm = CreateObject("adodb.Stream")    adoSrm.Mode = 3    a
利用AdoDb.Stream对象来读取UTF-8格式的文本文件
01-20
代码如下:‘函数名称:ReadTextFile     ‘作用:利用AdoDb.Stream对象来读取UTF-8格式的文本文件     ‘—————————————————-     Function ReadFromTextFile (FileUrl,CharSet)         If FileUrl = “” OR IsNull(FileUrl) Then             ReadFromTextFile = “”             Exit Function         End If         If Not FLib.IsReallyPath(FileUrl)
【Excel 读取TXT 】VBA 工作中之灵活强大的通用方法 - “ADODB.Stream“
最新发布
qq_33764107的博客
05-18 553
本文介绍了使用 ADODB.Stream 对象处理文本文件的灵活性和强大功能。通过 Stream，用户可以自定义字符集编码，避免乱码问题，并支持读取二进制文件。在处理大文件时，Stream 可以分段读取，避免内存溢出，提升性能。此外，Stream 允许在读取过程中进行数据拦截和处理，实现自动化数据清理。文章提供了两个代码示例，分别展示了如何一次性读取文本文件内容以及如何自定义读取字符数量，并详细列出了 ADODB.Stream 的常用属性和方法，如 Open、Close、ReadText 等。
Adodb.Stream 的使用说明
11-21 748
 组件："Adodb.Stream"　　有下列方法：　　Cancel 方法　　     使用方法如下　　     Object.Cancel　　     说明：取消执行挂起的异步 Execute 或 Open 方法的调用。　　Close  方法　　     使用方法如下　　     Object.Close　　     ：关闭对像　　CopyTo 方法　　     使用方法如下　　     Obj
组件："Adodb.Stream" 的说明
07-23 636
组件："Adodb.Stream" 有下列方法： Cancel 方法 使用方法如下 Object.Cancel 说明：取消执行挂起的异步 Execute 或 Open 方法的调用。 Close　方法 使用方法如下 Object.Close ：关闭对像 CopyTo 方法 使用方法如下 Object.CopyTo(destStream,[CharNumber]) 说明：将对像的数据复制，destSt
Adodb.Stream
dadou
09-25 804
组件："Adodb.Stream"　　有下列方法：　　Cancel 方法　　 使用方法如下　　 Object.Cancel　　 说明：取消执行挂起的异步 Execute 或 Open 方法的调用。　　Close 方法　　 使用方法如下　　 Object.Close　　 ：关闭对像　　CopyTo 方法　　 使用方法如下　　 Object.CopyTo(destStream,[CharNumber]
asp adodb.stream对象的方法/属性
10-30
下面我们将深入探讨ADODB.Stream对象的主要方法与属性。 #### 1. Cancel 方法 - **使用方式**：`Object.Cancel` - **说明**：该方法用于取消正在执行的异步`Execute`或`Open`方法调用。 - **示例代码**： ```...
用ADODB.Stream转换
10-31
该函数使用 ADODB.Stream 对象将流转换为文本，并返回转换后的文本。 getContentByUrl 函数 在上面的代码中，我们定义了一个名为 getContentByUrl 的函数，该函数用于从指定的 URL 地址获取内容。该函数使用 MSXML...
ADODB.Stream组件Charset属性值集合
10-30
`Charset`属性用于指定ADODB.Stream对象中数据的字符集。正确的字符集设置对于确保文本数据能够被正确读取和写入至关重要。如果设置了错误的字符集，则可能会导致数据损坏或无法正确显示。 #### 四、字符集列表及...
使用asp下的adodb.stream 下载文件而不是打开
10-30
在了解如何使用ASP技术结合ADODB.Stream对象来实现文件的下载而不是直接在浏览器中打开之前，我们首先需要了解一些基础的概念。当用户在浏览器的地址栏输入一个文件的URL路径时，浏览器会根据文件类型决定如何处理该...
使用vbs读写文件（Adodb.Stream）方式
05-27
使用vbs读写文件（Adodb.Stream）方式，防止乱码
用ADODB.Stream代替FSO读取文本文件 (转)
cuiji1279的博客
08-15 245
用ADODB.Stream代替FSO读取文本文件 (转)[@more@]昨天我问过这个问题,不过没人回答到点上,今天搞定了.贴出来给觉得有用的朋友,希望其他朋友不用走弯路. '文件内容读取.Function LoadFile(...
asp adodb.stream读取文件和写文件
weixin_33775572的博客
07-04 887
读取文件操作： '------------------------------------------------- '函数名称:ReadTextFile '作用:利用AdoDb.Stream对象来读取UTF-8格式的文本文件 '---------------------------------------------------- Function ReadFromText...
用ADODB.Stream代替FSO读取文本文件
小P的专栏
10-19 701
您正在看的asp教程是:用ADODB.Stream代替FSO读取文本文件。  昨天我问过这个问题,不过没人回答到点上,今天搞定了.贴出来给觉得有用的朋友,希望其他朋友不用走弯路.文件内容读取.Function LoadFile(ByVal File)    Dim objStream    On Error Resume Next    Set objStream = Server.Cr
StreamWrite-StreamRead 读写文本文件
weixin_30305735的博客
05-13 261
1 using System; 2 using System.Collections.Generic; 3 using System.Linq; 4 using System.Text; 5 using System.Threading.Tasks; 6 7 //添加命名空间 8 using System.IO; 9 10 namespace 读取文本文...
ADODB.stream
m0_53319566的博客
03-11 1666
1、ADODB.stream对象 FilesystemObject的OpenTextFile 默认会用系统的编码读取文本，默认一般都是ANSI（通常我们称为ASCII字符） FilesystemObject的OpenTextFile 只能读取Unicode和ANSI的编码的文件。 对于UTF-8编码的文本文件FilesystemObject 但是ADODB.stream可以读取utf-8和其它编码的文 件 ADODB.stream对象的文件路径C:\Program Files\Common Files\Sy
一段精简的使用 ADODB.Stream 读写"大字段"的 VB 代码
zgqtxwd的专栏
05-01 579
<!--google_ad_client = "pub-2947489232296736";/* 728x15, 创建于 08-4-23MSDN */google_ad_slot = "3624277373";google_ad_width = 728;google_ad_height = 15;//--><script type="text/javascript"
VB中ADODB.Stream对象详细使用教程
通过Stream对象，开发者可以打开、读取、写入、保存和复制数据流，进行数据的传输和转换。此外，Stream还支持对数据流的操作，例如设置字符集、读取和写入文本、定位数据流的位置、控制流的大小以及状态管理等。" ...
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值