' 寫入檔案
' 12:15 2005/3/9
Option Explicit
' ****************** DIM 區
dim strpath
dim fso
dim myfile,i
Set FSO = CreateObject("Scripting.FileSystemObject")
' ****************** 修改區
strpath = "\\cc\2332\tt"
' ****************** SET區
Set myfile = FSO.CreateTextFile(strpath & "\" & "writel.txt",true) 'tmpfile
' ******************
for i = 20 to 100
myfile.writeline i
next
myfile.close
-
下載 出處 下載網址： http://tinyurl.com/plodb56 Step 1 下載取得「Windows10TweakTool」並解壓縮，在壓縮出的「Windows10SettingTool.bat」上按一下滑鼠右鍵，點擊選單中的【以系統管理員身分...
-
作者:gamepool 本人是一個乒乓的愛好者，打球多年，技藝平平，不足掛齒，但仍然痴迷此道。 買XO有相當一部分原因是因為有《乒乓球》這款遊戲。這也是我在XO上通的第一款game。在過去一個月裡，經過日夜奮戰，live排名從15000名已升至5000名左右。在LIVE上能見到中...
-
最後那個結局，簡直妙呆了！ 有個男人已經超厭煩他每天都要去公司上班，但他老婆卻可以成天待在家裡 於是，他向上帝禱告說 :「親愛的主，我每天上班投入八個鐘頭的時間， 但我的老婆只待在家裡，閒閒沒事做而已，我希望讓她知道我過的是怎麼樣的日子， 所以請讓我們的身體交換 ! 」上帝以祂無...
沒有留言:
張貼留言