背景 早期 Flash (SWF) 無法直接存取瀏覽器 Cookie，需透過 ASP 頁面代理讀寫，並先確認瀏覽器是否接受 Cookie。 testCooki

完整程式碼 <% Dim visitCount visitCount = Request.Cookies(chunfeng)(totalvisit) 讀

前端表單 (folder.htm) <html><head><title>線上建立資料夾</title><

標準逐行讀取模式 = UBound(lines) Then ReDim Preserve lines(i + 100) Loop ts.Close 現在 l

最小程式碼 (readline.asp) <% Dim filePath, fso, ts, line filePath = Server.MapPath

完整範例 (showtxt.asp) <%@ LANGUAGE = VBScript %> <% Const ForReading = 1,

通用函數 <% Function WriteToFile(fileName, contents, append, useUnicode) On E

⚠️ 重要前提與風險 需在伺服器安裝 Microsoft Word (完整版，非 Viewer)。 DCOM 設定：`dcomcnfg` → `Microso

遞迴函數 <%@ Language=VBScript %> <% Function TraverseFolder(path) Dim

前端表單 (creatfolder.htm) <form name=form1 method=POST action=folder.asp> 建立資

架構說明 使用 Microsoft Excel Driver (*.xls) ODBC 驅動程式，透過 ADODB 連接 Excel 檔案，將指定工作表/命名範

兩檔案極簡實作 docform.htm (前端表單) <form action=doccreate.asp method=GET> 姓名：<

單一檔案完整展示 (fileops.asp) <%@ LANGUAGE=VBScript %> <% Const ForReading = 1

建立資料夾 <% Dim fso, folderPath Set fso = CreateObject(Scripting.FileSystemObjec

常用函數封裝 0 Then GetExtensionNoDot = Mid(ext, 2) Else GetExtensionNoDot = End Fun

最小程式碼 <% Set fso = Server.CreateObject(Scripting.FileSystemObject) Dim folder

可重複使用函數 <% Function FileGetLastModified(sFile) Dim fso, f Set fso = C

方法一：CM_FileUtils.GetProperty (商業元件) <% Dim objCMFU, strModified Set objCMFU =

功能說明 使用者在前端輸入關鍵字，伺服端以 Scripting.FileSystemObject 遞迴掃描指定根目錄 (含所有子目錄)，找出檔名包含關鍵字的檔案

系統架構 aspnp.asp：啟動頁，提供「開啟舊檔」(檔案上傳欄)、「新建」按鈕，開啟編輯視窗。 newdoc.asp：核心編輯器，含工具列 (字型、字號、