ASP

/********************************************************************************** * * 功能說明:XML處理基類 * 作者: 劉功勳; * 版本:V0.1(C#2.0);時間:2006-12-13 * * *******************************************************************************/ using System;

1、IsStartupScriptRegistered：對象是否註冊了啟用指令碼。 2、IsClientScriptBlockRegistered：對象是否註冊了用戶端指令碼塊。 3、IsClientScriptIncludeRegistered：對象是否註冊了用戶端指令碼包含。 第一個例子： string info = "<script>alert('你好嗎？');</script>";

複製代碼 代碼如下://由gridviw匯出為Excel public static void ToExcel(System.Web.UI.Control ctl) { HttpContext.Current.Response.AppendHeader("Content-Disposition", "attachment;filename=Excel.xls"); HttpContext.Current.Response.Charset = "UTF-8";

book_admin.aspx複製代碼 代碼如下:<asp:GridView ID="grwBook" runat="server" CellPadding="4" ForeColor="#333333" GridLines="None" AutoGenerateColumns="false" AllowPaging="true" DataKeyNames="ID" OnPageIndexChanging="grwBook_PageIndexChanging" PageSize="12"&

在網上找了很久也沒有找到例子，沒辦法了，想偷懶也偷不成了，還是自己老老實實的寫一個吧。不多廢話，下面請看我做的詳細方法。 1。無限級分類肯定要資料庫支援啦，使用者可以動態添加他們的分類嘛，下面是資料庫的結構：資料庫主要有三個欄位，這是最基本的了。第一個是主鍵，第二個是分類的名稱了，第三個是父級目錄id號。 2。成品的：（大家最關心的是不是這個啊？看看是什麼樣子再看程式怎麼吧） 看！！就長這個模樣啦，這個層次關係就是上面那個資料所顯示的結果。怎麼樣？還行吧。。。

比如 1223445677777778aabbcccccccccc 經過過濾之後就是12345678abc 複製代碼 代碼如下:<% '過濾重複 Function norepeat(Str) Dim RegEx If IsNull(Str) Or Str="" Then Exit Function Set RegEx=New RegExp RegEx.Global = True RegEx.IgnoreCase=True

問題的解決辦法是，對於一個需要發送大資料的域，在提交表單前將資料拆分為小於限額的數份，分別放在數個hidden域中，同時把原有域清空，再正式提交表單。伺服器端還是用Request.Form()讀取各hidden域的資料，再按照順序把他們拼接起來就行了。主要代碼如下： 注意：需要在Form中的HTML代碼內指定一個DIV,以便向其中動態插入hidden域。 ====用戶端範例程式碼==== 在Form中的HTML代碼內加入：<div id=divHidden></div>，

<script language ="vbs"> '函數名稱：RegExpTest '參數： strng－－》要處理的字串;patrn－－》以|隔開的各種結尾標誌如：<br/>|</p>|<br>; patrn2－－》要替換成的字串，也以|隔 開 '作者：柳永法(yongfa365)'Blog '功能：將strng字串內的以patrn結束的字元後邊隨機的加上patrn2裡的內容 Function RegExpTest(strng,

for i=1 to 256 yongfa365=yongfa365&"<!--這裡主要是讓前邊先產生２５６個字元，這樣才可以即時輸出-->" if len(yongfa365)>=256 then exit for next MadeBasic() MadeModel() MadeIndexBlogItem() response.Write "１/６所有模版產生完成<br&

<%sub fsojs()%> <% Set fso= Server.CreateObject("Scripting.FileSystemObject") set fd=fso.createtextfile(server.MapPath("../category.js"),true) '開始操作 set rs=server.CreateObject("adodb.recordset") rs.Open "select * from dept_category",conn,1,

'////////////////////////////////////////////////FSO操作///////////////////////////////////// '判斷檔案夾是否存在 Function FolderExits(Folder) Folder=Server.Mappath(Folder) Set FSO= Server.CreateObject("Scripting.FileSystemObject") IF FSO.FolderExists(Folder)

'函數名:getHTMLContent'參數:NO-->要取得的字元數, txtContent-->要處理的字串 '功能: 從字串裡截取N個帶HTML的字元,現在的實現方法還不完善,過程是:從字串裡找各種控制項的開始,然後依些分開,放到數組裡,然後一個一個數組的加上來看看字元是否大於給定的字元如果是,那麼,返回這個數組. '作者:柳永法 '時間:2007-6-1 20:03 Function getHTMLContent(NO, txtContent) If

<% Function AutoKey(strKey) Const lngSubKey=2 lngLenKey=Len(strKey) Select Case lngLenKey Case 0 '若為空白串，轉到出錯頁 Response.Redirect "Error.htm" Case 1 '若長度為1，則不設任何值 strNew1="" strNew2="" Case Else '若長度大於1，則從字串首字元開始，迴圈取長度為2的子字串作為查詢條件 For i=1

<form method="post" name="myform" action="?action=backupdatabase"> 選擇操作： <input type="radio" name="act" id="act_backup"value="backup"> <label for=act_backup>備份</label> <input type="radio" name="act" id="act_restore"

<% '欄位內網址加上聯結。 Function ToLink(Str) Dim RE 'Regex對象 Dim strContent If IsNull(Str) Then Str = "" Set RE = New RegExp '建立正 則運算式對象 With RE .Global = True '搜尋應用於整個字串 .IgnoreCase = True '搜尋不區分大小寫 strContent =

1、 response.redirect 這個跳轉頁面的方法跳轉的速度不快，因為它要走2個來回(2次postback)，但他可以跳 轉到任何頁面，沒有網站頁面限制(即可以由雅虎跳到新浪)，同時不能跳過登入保護。 但速度慢是其最大缺陷!redirect跳轉機制：首先是發送一個http請求到用戶端，通知需要跳轉到新頁面，然後用戶端在發送跳轉請求到伺服器端。需要注意的是跳轉後內部空間儲存的所有資料資訊將會丟失，所以需要用到session。 　　2、 server.transfer

下邊這個存為Pack.asp,打包檔案時運行 複製代碼 代碼如下:<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <%OptionExplicit%> <%OnErrorResumeNext%> <% Response.Charset="UTF-8"%> <% Server.ScriptTimeout=99999999%>

開啟vs2005或vs2008, 建立網站，把ACCCESS資料庫Copy到App_Data裡， 拖"AccessDataSource"到視窗裡， 配置資料來源。。。 選擇資料庫 下一步 sql語句裡是空的，點“查詢產生器...” 彈出： --------------------------- Microsoft Visual Studio --------------------------- 未將對象引用設定到對象的執行個體。 --------------------

asp生日自動提醒小程式 用ASP編寫，調試通過，使用方便-asp birthday automatically remind small programs with the preparation of ASP, debug, easy to use方法一：

需要用到這個功能，沒怎麼測試呢，測試後給具體代碼 假如地址是： http://dxy.com:8082/test/geturl.asp?Param-VR52tmx3syn03777.html 方法一：簡單，得不到參數，只有一個虛擬路徑 複製代碼 代碼如下:GetUrl =request("url") '這個因為我們沒有url=什麼字樣所以直接pass掉 方法二：得到整個URL，得到參數 複製代碼 代碼如下:'得到當前頁面的地址 Function GetUrl() On