Time of Update: 2017-01-13
<%@language="vbscript" codepage="936"%><%'定義資料連線option expliciton error resume nextdim startime,endtimestartime=timer()dim db,conn,rsdb = "provider=microsoft.jet.oledb.4.0;data source=" &
Time of Update: 2017-01-13
我們是利用upload檔案上傳組件進行檔案上傳哦。<%Server.ScriptTimeOut=5000%><!--#include file="conn.asp"--><!--#include FILE="upload_5xsoft.inc"--><html><head><title>檔案上傳</title><link
Time of Update: 2017-01-13
Function Xszh(zh)if zh<>"" or not isnull(zh) then zh=replace(zh,"
Time of Update: 2017-01-13
<!--#include File="conn.asp"--><%Dim idDim Rs,Sql id = Replace(Trim(Request.QueryString("id")),"'","")If Session("id"&id)<>"" Then Set Rs = Server.CreateObject("
Time of Update: 2017-01-13
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><%dim DataLinkType,conn,connstr,MyDbPathMyDbPath="data/Database.mdb" '資料庫檔案位置DataLinkType = 0 '設定資料庫連接方式,1為SQL資料庫,0為Access資料庫If
Time of Update: 2017-01-13
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%><% Response.Expires = 0Pic = Request("p")PointX = CInt(Request("x"))PointY = CInt(Request("y"))CutWidth = CInt(Request("w"))CutHeight =
Time of Update: 2017-01-13
,如果你未安裝aspjpeg組件請到這裡下載。http://down.111cn.net/down/soft/object/2009/0227/35.htmlFunction ChkImg(img) On Error Resume Next '為了捕獲錯誤資訊,需要讓代碼在出錯時能繼續執行 Dim RetunValue, C
Time of Update: 2017-01-13
' ============================================ ' 格式化時間(顯示) ' 參數:n_Flag ' 1:"yyyy-mm-dd hh:mm:ss" ' 2:"yyyy-mm-dd" ' 3:"hh:mm:ss" ' 4:"yyyy年mm月dd日" ' 5:"yyyymmdd" ' 6:"yyyymmddhhmmss" ' =====
Time of Update: 2017-01-13
Function add_del_update(tablename,str,id)Select Case str Case "insert": sql="select * from ["&tablename&"] where id=null" rs.open sql,conn,1,3 rs.addnew For
Time of Update: 2017-01-13
function array_no(cxstr1,cxstr2,cxstr3)if len(cxstr3) > 0 thenif not IsNumeric(cxstr3) thenarray_no = "對不起,參數3類型必需為數字"Exit Functionend ifelsearray_no = "對不起,參數3類型
Time of Update: 2017-01-13
Function HTMLDecode(reString) Dim Str:Str=reString If Not IsNull(Str) Then Str = Replace(Str, "&", "&") Str = Replace(Str, ">", ">") Str =
Time of Update: 2017-01-13
<%Option ExplicitResponse.buffer=trueNumCodeFunction NumCode() Response.Expires = -1 Response.AddHeader "Pragma","no-cache" Response.AddHeader "cache-ctrol","no-cache" dim
Time of Update: 2017-01-13
<!-- #include file="../inc/conn1.asp"--><!-- #include file="../inc/md5.asp"--><% if cstr(request("code"))<>cstr(session("getcode")) then
Time of Update: 2017-01-13
<%if request("id")="" then response.Write "<script>alert('對不起!你輸入了非法字元');location.href='../';</Script>"response.endend ifid=request("id")set rs=server.CreateObject("adodb.recordset")rs.
Time of Update: 2017-01-13
例子如下using System;using System.Collections.Generic;using System.Linq;using System.Web;using System.Web.UI;using System.Web.UI.WebControls;using System.Text.RegularExpressions;namespace DiLian{ public partial class _Default :
Time of Update: 2017-01-13
ajax介紹AJAX = 非同步 JavaScript 和 XML。AJAX 是一種用於建立快速動態網頁的技術。通過在後台與伺服器進行少量資料交換,AJAX 可以使網頁實現非同步更新。這意味著可以在不重新載入整個網頁的情況下,對網頁的某部分進行更新。傳統的網頁(不使用 AJAX)如果需要更新內容,必需重載整個網頁面。有很多使用 AJAX 的應用程式案例:新浪微博、Google
Time of Update: 2017-01-13
在我們 .NET web.config
Time of Update: 2017-01-13
當我們的網站需要支援下載大檔案時,如果不做控制可能會導致使用者在訪問下載頁面時發生無響應,使得瀏覽器崩潰。可以參考如下代碼來避免這個問題。 代碼如下複製代碼 using System; namespace WebApplication1 { public partial class DownloadFile : System.Web.UI.Page {
Time of Update: 2017-01-13
ContextMenu Control 捷徑功能表控制項概述:MSDN Liabrary 中包含了幾個DHTML捷徑功能表的樣本。分別提供了對這一功能的不能實現方法。一個捷徑功能表就是在頁面中任何位置的一組標記代碼。它包括兩部分內容——介面和指令碼(當使用者在頁面右擊時關聯UI),UI提供一個可點擊的元素的列表——功能表項目——和各自的內容文本,表徵圖,命令名(command name),目標url,提示(tooltip),
Time of Update: 2017-01-13
用Asp.net實現文字浮水印,這裡介紹一種簡單的方法,雖然簡單,但是感覺很實用,而且ASP.NET新手也容易理解,便於修改完善。 代碼如下複製代碼 <%@ Import Namespace="System" %> <%@ Import Namespace="System.IO" %> <%@ Import Namespace="System.Drawing"