① VB6请教怎么将数据写入文本文件
'一行一行的写入:
dimfidasinteger
fid=freefile()'获取一扰或个可用的文件号
Open"C:Test.txt"ForOutput卖旅as#fid'打开C:Test.txt文件,方式式为写入(Output)
print#fid,"1234"
print#fid,"1235"
'假如数据存在于数组a中:
dimiasinteger
fori=0toubound(a)
print#fid,a(i)
next
'如果数组内容是字符串类型,可以用join(a,vbcrlf)把数组项连接成一个字符串,然后把字符串写缓配伍入文件。
② C语言如何实现对txt文件的读取和写入
使用fopen的r方式可以实现读取,用w+方式可以实现写入。
1.fopen的函数原型:FILE
*
fopen(const
char
*
path,const
char
*
mode);
fopen函数的第一个参数是文件路径,第二个参数是打开方式,有以下几种方式:
r
以只读方式打开文件,该文件必须存在。
r+
以可读写方式打开文件,该文件必须存在。
rb+
读写打开一个二进制文件,允许读数据。
rw+
读写打开一个文本文件,允许读和写。
w
打开只写文件,若文件存在则文件长度清为0,即该文件内容会消失。若文件不存在则建立该文件。
w+
打开可读写文件,若文件存在则文件长度清为零,即该文件内容会消失。若文件不存在则建立该文件。
a
以附加的方式打开只写文件。若文件不存在,则会建立该文件,如果文件存在,写入的数据会被加到文件尾,即文件原先的内容会被保留。(EOF符保留)
a+
以附加方式打开可读写的文件。若文件不存在,则会建立该文件,如果文件存在,写入的数据会被加到文件尾后,即文件原先的内容会被保留。
(原来的EOF符不保留)
wb
只写打开或新建一个二进制文件;只允许写数据。
wb+
读写打开或建立一个二进制文件,允许读和写。
wt+
读写打开或着建立一个文本文件;允许读写。
at+
读写打开一个文本文件,允许读或在文本末追加数据。
ab+
读写打开一个二进制文件,允许读或在文件末追加数据。
上述的形态字符串都可以再加一个b字符,如rb、w+b或ab+等组合,加入b
字符用来告诉函数库打开的文件为二进制文件,而非纯文字文件。
返回值:文件顺利打开后,指向该流的文件指针就会被返回。如果文件打开失败则返回NULL,并把错误代码存在errno中。
2.例程:
#include<stdio.h>
#define F_PATH "d:\\myfile\\file.dat"
char c;
int main(){
FILE*fp=NULL;//需要注意
fp=fopen(F_PATH,"w"); //创建文件
if(NULL==fp) return -1;//要返回错误代码
while(scanf("%c",&c)!=EOF) fprintf(fp,"%c",c); //从控制台中读入并在文本输出
fclose(fp);
fp=NULL;//需要指向空,否则会指向原打开文件地址
return 0;
}
③ Java+scanner如何向文本文档中写入多行数据
在 Java 中使用 Scanner 类无法直接向文本文档中写入多行数据,因为 Scanner 主要是用于从输入流中读取数据。如果要向文本文档中写入多行数据,可以使用 BufferedWriter 类。
以下是一个示例代码,演示如何使用 BufferedWriter 类向文本文档中写入多行数据:
import java.io.*;
public class WriteToFileExample {
public static void main(String[] args) {
try {
BufferedWriter writer = new BufferedWriter(new FileWriter("output.txt"));
// 向文件中写入多行数据
writer.write("第一行数据");
writer.newLine(); // 换行
writer.write("第二行数据");
writer.newLine(); // 换行
writer.write("第三行数据");
// 关闭文件流
writer.close();
System.out.println("写入完成");
} catch (IOException e) {
System.out.println("写入文件时发生错误");
e.printStackTrace();
}
}
}
在上面的示例代码中,我们创建了一个 BufferedWriter 对象,并将其连接到一个名为 output.txt 的文件中。然亏尺后,我们使用 write() 方法向文销凳高件中写入多行数据,并使用 newLine() 方法在每行数据后添加换行符。最后,我们使用 close() 方法关闭文件流。
希望这个示例代码能够帮助您理解如何向文本文档中写入多行数粗困据。
④ 怎样将一百万个浮点型的数据快速的写入到文本文件中
//没啥高科技,编译release,这个2000万也就消耗我9秒不到
#include<stdio.h>
#include<stdlib.h>
#include<string.h>
#include<assert.h>
#include<time.h>
//如果你用的是VC6,这个宏对于习惯标准语法的人很管用
#defineforif(false);elsefor
//lpszFilePath文件名
//pData浮点数数组
//iLength浮点数个数搏咐
voidwriteData(const举银伏char*constlpszFilePath,constdouble*constpData,constintiLength)
{
intiFileSize=0;
FILE*pFile=fopen(lpszFilePath,"w");
assert(pFile!=NULL);
//申请32MB的缓正携冲
char*constpBuffer=(char*)malloc(1024*1024*32);
assert(pBuffer!=NULL);
char*constpBufferEnd=pBuffer+1024*1024*32-100;
char*pCurrent=pBuffer;
for(inti=0;i<iLength;i++)
{
if(pCurrent>=pBufferEnd)
{
fwrite(pBuffer,pCurrent-pBuffer,1,pFile);
pCurrent=pBuffer;
}
pCurrent+=sprintf(pCurrent,"%e",pData[i]);
pCurrent[0]=' ';
pCurrent++;
}
fwrite(pBuffer,pCurrent-pBuffer,1,pFile);
fclose(pFile);
free(pBuffer);
}
intmain()
{
clock_tstart,finish;
start=clock();
double*a=newdouble[20000000];
writeData("c:\1.txt",a,20000000);
finish=clock();
printf("消耗时间:%.2f秒",(double)(finish-start)/CLOCKS_PER_SEC);
delete[]a;
return0;
}
⑤ 如果用c#代码实现:运行——cmd——notepad,对找开的文本文件进行数据写入!
很容易实现。
首先你需要获得notpad的句柄,然后用WINAPI里面的困闷锋sendmessage写入到记罩岁事本
首先添加引用
using System.Runtime.InteropServices;
调用方法如下:
[DllImport("User32.DLL")]
public static extern int SendMessage(IntPtr hWnd, uint Msg, int wParam, string lParam);
[DllImport("User32.DLL")]
public static extern IntPtr FindWindowEx(IntPtr hwndParent, IntPtr hwndChildAfter, string lpszClass, string lpszWindow);
public const uint WM_SETTEXT = 0x000C;
private void button1_Click(object sender, EventArgs e)
{
#region [ 启动记事本 ]
System.Diagnostics.Process Proc;
try
{
// 启动记事本
Proc = new System.Diagnostics.Process();
Proc.StartInfo.FileName = "notepad.exe";
Proc.StartInfo.UseShellExecute = false;
Proc.StartInfo.RedirectStandardInput = true;
Proc.StartInfo.RedirectStandardOutput = true;
Proc.Start();
}
catch
{
Proc = null;
}
#endregion
#region [ 传递数据给记事本 ]
if (Proc != null)
{
// 调用 API, 传递数据
while (Proc.MainWindowHandle == IntPtr.Zero)
{
Proc.Refresh();
}
IntPtr vHandle = FindWindowEx(Proc.MainWindowHandle, IntPtr.Zero, "Edit", null);
// 传递数据给汪晌记事本
SendMessage(vHandle, WM_SETTEXT, 0, "Message");
}
#endregion
}
⑥ 如何将ASP表单提交的数据写入文本文件中
用fso的TextStream
,先读取文件然后用writeline写入
_________________________________________________________________
TextStream对象
TextStream对象具有一系列的方法和性质,这些方法和性质可以用于对某一文件进行操作或返回该文件的信息。
<%
Set
MagicFs
=
Server.CreateObject(“Scripting.FileSystemObject”)
Set
Magicfile=MagicFs.CreateTextFile(“c:\\myfile.txt”,True)
%>
方法
Close
关闭打开的文本流文件。
Read(characters)
读取文本流文件中一定数量的字符,并把它写入到一字符串中。
ReadAll
读取整个文本流文件(可能很大),并把它写入到字符串中。
ReadLine
读取文本流文件的一行,并把它写入字符串中。不包含新行符。
Skip(characters)
跳过文本流文件中指定数目的字符。
SkipLine
跳过文本流文件的一行。
Write(String)
往文本流文件内写入字符串,不包含新行符。
WriteBlankLine(Lines)
往文本流文件内写入指定数目的空行(新行符)。
WriteLine([String])
往文本流文件内写入包含新行符的字符串。
性质
AtEndOfLine
如果枣森大遇到新行符,返回值TRUE;否则返回凳竖值为FALSE。
AtEndOfStream
如果到达文本流文件的结尾时,返回值为TRUE,否则返回值为FALSE。只在文本春咐流文件是用于读取时。
Column
返回当前列在文本流文件中的列位置。
Line
返回当前行在文本流文件中的行位置。
⑦ VBScript中怎样对文本文件里读写数据
分类: 电脑/网络 >> 程序设计 >> 其他编程语言
问题描述:
对该文本文件多次写入数据时不影响之前写入的数据; 读数据是只读取文本中指定行的部分数据? 谢谢
解析:
用FileSystemObject对象创建一个TextStream便实现对文本文碧前颤件的读写
---------------------------------------------------
创建指定文件并返回 TextStream 对象,该对象可用于读或写创建的文件。
语法
object.CreateTextFile(filename[, overwrite[, unicode]])
CreateTextFile 方法的语法悔败有以下部分:
object 必选项。应为 FileSystemObject 或 Folder 对象的名称。
filename 必选项。字符串表达式,指明要创建的文件。
overwrite 可选项。Boolean 值指明是否可以覆盖现有文件。如果可覆盖文件,该值为 True;如果不能覆盖文件,则该值为 False 。如果省略该值,则不能覆盖现有文件。
unicode 可选项。Boolean 值指明是否以 Unicode 或 ASCII 文件格式创建文件。如果以 Unicode 文件格式创建文件,则该值为 True;如果以 ASCII 文件格式创建文件,则该值为 False。如果省略此部分,则假定创建 ASCII 文件。
说明
以下代码举例说明如何使用 CreateTextFile 方法创建并打开文本文件:
Sub CreateAfile
Dim fso, MyFile
Set fso = CreateObject("Scripting.FileSystemObject")
Set MyFile = fso.CreateTextFile("c:\testfile.txt", True)
MyFile.WriteLine("这是一个测试。")
MyFile.Close
End Sub
对于 filename 已经存在的文件,如果 overwrite 参数为 False,或未提供此参数时,则会出现错误。
-----------------------------------------------------------
描述
打开指定的文件并返回一个 TextStream 对象,可以读取、写入此对象或将其追加到文件。
语法
object.OpenTextFile(filename[, iomode[, create[, format]]])
OpenTextFile 方法的语法有以下部分:
object 必选项。应为 FileSystemObject 对象的名称。
filename 必选项。字符串表达式,指明要打开的文件名称。
iomode 可选项。输入/输出模式,是下列三个常数之一:ForReading,ForWriting,或 ForAppending。
create 可选项。Boolean 值,指出当指定的 filename 不存在时是否能够创建新文件。允许创建新文件时为 True,否则为 False。默认值为 False。
format 可选项。三个 Tristate 值之一,指出以何种格式打开文件。若忽略此参数,则文件以 ASCII 格式打开。
设置
iomode 参数可为下列设置之一:
ForReading 1 以只悔渗读模式打开文件。不能对此文件进行写操作。
ForWriting 2 以只写方式打开文件。不能对此文件进行读操作。
ForAppending 8 打开文件并在文件末尾进行写操作。
format 参数可为下列设置之一:
TristateUseDefault -2 以系统默认格式打开文件。
TristateTrue -1 以 Unicode 格式打开文件。
TristateFalse 0 以 ASCII 格式打开文件。
说明
以下代码举例说明如何使用 OpenTextFile 方法打开写文件:
Sub OpenTextFileTest
Const ForReading = 1, ForWriting = 2, ForAppending = 8
Dim fso, f
Set fso = CreateObject("Scripting.FileSystemObject")
Set f = fso.OpenTextFile("c:\testfile.txt", For Writing, True)
f.Write "嗨,你好!"
f.Close
End Sub
-------------------------------------------------------------
另TextStream还有如下方法:
Close 方法
Read 方法
ReadAll 方法
ReadLine 方法
Skip 方法
SkipLine 方法
Write 方法
WriteLine 方法
WriteBlankLines 方法
详细可参阅VBScript 5.0 帮助文档
⑧ VB中TEXT如何往当前目录下的TXT文本指定的位置写入数据
1、打开数据库文件,把要输出的数据表记录生成一个 RecordSet 数据记录集,然后把要输出的字段内容用循环唯羡的方式输出到一个文本文件就好了。
当然要看你的数据库是什么类型的了, Access,SQL 程序芦数是有些区别的.
2、给你一个生成文本文件的调用过程陪山首,参考一下
Private Sub SaveTodayTestData(tData As String)
Dim FileNum As Long
Dim fileName As String
On Error GoTo SaveErr
'***数据文件路径
If Len(Dir$(App.Path + "\Data", vbDirectory)) = 0 Then MkDir App.Path + "\Data" ‘文件是否存在
fileName = App.Path + "\Data\" + Format$(Date, "YYYY") + Format$(Date, "MM") + Format$(Date, "DD") + ".txt"
’按日期生成一个文本文件的名称,如:20131017.Txt
FileNum = FreeFile()
Open fileName For Append As FileNum
Print #FileNum, tData
Close FileNum
Exit Sub
SaveErr:
MsgBox "保存测试错误!" + Chr$(13) + Error$, 48, "重要提示"
Exit Sub
End Sub
⑨ 在linux中给一个文本文件写内容的方法(三种)
一,使用文本编辑器法。
二,使用重定向的方法。
三,使用像是sed这种程序来改写文件内容。
⑩ C语言如何写入文本文件
1、首先输入下方的代码
#include <stdio.h>
int main()
{
//下面是写数据,将数字0~9写入到data.txt文件中
FILE *fpWrite=fopen("data.txt","w");
if(fpWrite==NULL)
{
return 0;
}
for(int i=0;i<10;i++)
fprintf(fpWrite,"%d ",i);
fclose(fpWrite);
//下面是读数据,将读到的数据存到数组a[10]中,并且打印到控制台上
int a[10]={0};
FILE *fpRead=fopen("data.txt","r");
if(fpRead==NULL)
{
return 0;
}
for(int i=0;i<10;i++)
{
fscanf(fpRead,"%d ",&a[i]);
printf("%d ",a[i]);
}
getchar();//等待
return 1;
}