[已解决]如何实现创建打开记事本,又可以写又可以读
本帖最后由 731106 于 2011-3-31 13:27 编辑FileOpen的读写模式好象只可以写,或者只可以读,能不能实现,又可以写又可以读?比如:$file = FileOpen("a.txt", 2 + 8)
If $file = -1 Then
MsgBox(0, "错误", "不能打开文件.")
Exit
EndIf
$s1 = InputBox("", "新加记录")
FileWrite($file, $s1 & @CRLF)
$mj = FileRead($file)
MsgBox(262144, "系统", "代码:" & @CRLF & $mj)
FileClose($file)这样只能往里面写,但是却读不出,如果要写只有把"2+8"去掉,但是这样就创建不了txt文件了,有没有办法,又可创建又可读写? $sFilePath = 'a.txt'
$sText = InputBox('', '新加记录')
FileWrite($sFilePath, $sText)
MsgBox(262144, '系统', '代码:' & FileRead($sFilePath)) 本帖最后由 731106 于 2011-3-31 13:12 编辑
这样可以是可以,但是当我重新运行代码的时候,原先里面的内容却还在,如何第二次运行就覆盖原来的a.txt呢,也就是变成空白的 重新想了一下,把我上面的代码和水木的代码结合一下就可以了,谢谢水木
页:
[1]