ASP

If Request.QueryString ("action") thenOption ExplicitResponse.buffer=trueNumcodeDim znumFunction Numcode ()Response.Expires =-1Response.AddHeader "Pragma", "No-cache"Response.AddHeader "Cache-ctrol", "No-cache"Dim znum,i,jDim ados,ados1Randomize

All nodes in the piece, there is a delete and edit two connections next to each node, where the code to delete is:Id=request ("id")If IsNumeric (ID) =false or isNull (ID) ThenResponse.Write ("parameter is not correct, please return!")

Dim CurrentPage ' Defines the current page Dim filename ' filename Const maxperpage=20 ' number of records displayed per page Dim Totalnumber ' Total Records Filename= "Showpages.asp" totalnumber=200 ' Set record total of 200 If not IsEmpty (Request

**vbscript Tetris Game **

The code is as follows Copy Code Class SqlString'************************************' Variable definition'************************************' sTableName----table name' isqltype----SQL statement type: 0-Add, 1-update, 2-delete,

  code is as follows copy code function Killn (ByVal s1) ' filter numeric parameter if not IsNumeric (S1) then killn=0 Else if s1〈0 or s1〉2147483647 then Killn=0 Else killn=clng (S1) End-if end-if End Function

Sub GetsafecodeDim Test,resultOn Error Resume NextSet Test=server.createobject ("ADODB.stream")Set test=nothingIf Err ThenDim znumRandomize TimerZnum=cint (8999*rnd+1000)Session ("Safecode") =znumResult=session ("Safecode")Elseresult= ""End

function IsValidEmail (email) Dim names, Name, I, C IsValidEmail = True names = Split (email, "@") If UBound (names) <> 1 Then IsValidEmail = False Exit function End If For each name in names If Len (name) IsValidEmail = False Exit function End

Prevent refreshing pages'================================================Sub Preventrefresh ()Dim Refreshtime,isrefreshRefreshtime = 10 ' Prevent refresh time, unit (seconds)Isrefresh = 1 ' Use anti-refresh function, 0 = no, 1 = yesIf Isrefresh = 1

XML section: ------------------------------------------------------------------ASP Tutorial Section:------------------------------------------------------------------- Untitled Document ' Establish a Database

The code is as follows Copy Code Dim Rs,sql,foundstrDim Classid,childstrDim Rssbody,rsstitle,rsshomepageurlDim Xmldom,node,cnode,cnode1,msginfoSet xmldom = Server.CreateObject ("Microsoft.FreeThreadedXMLDOM")Xmldom.appendchild

For small amounts of data, XML files have many advantages in retrieving updates on access. I have tested the use of the database, the site's membership information, merchandise data information, transaction information, Web site customization

Dim CurrentPage ' Defines the current page Dim filename ' filename Const maxperpage=20 ' number of records displayed per page Dim Totalnumber ' Total Records Filename= "Showpages.asp" totalnumber=200 ' Set record total of 200 If not IsEmpty (Request

Application object     Author: mi Xiansheng     1. Set of Application objectsIn the Application, there are two sets of Contents and StaticObject. You can use these two sets to control whether variables and objects are visible in the entire ASP

Updating daily news is a headache for webmasters. First, after collecting a large amount of news, they must make a large number of webpages, domestic news and IT news are really tiring. The most fatal point is that these loose news cannot be managed,

  A set of all keywords related to operations.HTML file tagText typographical mark original text style inwards title, bold, , Italic bottom line strikethrough Text flashing Large font small font Text Tagging text subscript default font settings

Flash mx (FLASH 6) debut, and gave the FLASH guests a reason to faint, because her new face made us excited.I. Start with the new functions of MX.After entering the MX development interface, click "Help => Samples" in the menu bar to open a webpage.

21. IsObject ()FUNCTION: Returns a boolean value indicating whether an expression refers to an automation object.SYNTAX: IsObject (expression)ARGUMENTS: expression is any valid expression.EXAMPLE: Set con = Server. CreateObject ("ADODB. Connection ")

ASP has five built-in (built-in) objects: Server, Request, Response, Application, and Session. Now we will explain them through examples. The first is the most commonly used Response object.Example 1 use Response to output HTML documents on the