۱۵-آذر-۱۳۸۴, ۰۱:۴۴:۳۱
۱۵-آذر-۱۳۸۴, ۰۲:۰۰:۰۵
سلام!
اول بايد فايل رو باز كني براي نوشتن:
بعد با دستور رايت تو فايل مي نويسي:
اگه بازم كمكلازم داشتي يا توضيح بيشتر راجع به دستورات و پارامترهاي ديگه دستورات خواستي بگو. تا جايي كه بتونم در خدمتم! :wink:
سيد محسن
اول بايد فايل رو باز كني براي نوشتن:
کد:
Open "FileName" For Append As #1کد:
St= Text1.Text
Write #1,Stسيد محسن
۱۵-آذر-۱۳۸۴, ۱۴:۱۲:۵۵
سلام
كد اون دوستمون خوب بود حالا من يه چيز برات مي نويسم كه ديگه اصلا مشكل نداشته باشي
اين كد براي باز كردن
اين كد براي ذخيره كردن
كد اون دوستمون خوب بود حالا من يه چيز برات مي نويسم كه ديگه اصلا مشكل نداشته باشي
اين كد براي باز كردن
کد:
'Arash RJ
'arashrj@gmail.com
'www.arashrj.co.sr
Open "C:\iran.txt" For Input As #1
While Not EOF(1)
Input #1, n
Text1.Text = Text1.Text & n & vbCrLf
Wend
Close #1اين كد براي ذخيره كردن
کد:
'Arash RJ
'arashrj@gmail.com
'www.arashrj.co.sr
Open "C:\iran.txt" For output As #1
print #1,Text1.Text
Close #1