if end

A user-defined function is a block of code stored in a database that can be returned to the calling program. Called as a system function, such as the max (value) function, where value is called a parameter. There are 3 types of function arguments.In

Class cls_fun  private x,y,ii  ==============================   function name: Alertinfo       use: Error display function   parameter     number: Error hint content infostr, turn page Gourl  ============= =================  public Function

At present, it can be realized: MD5 algorithm, SHA256 algorithm, first MD5 SHA256, SHA256 after MD5, two MD5, two times SHA256, 8-bit MD5 algorithm after the first 8-bit SHA256, 8-bit SHA256 algorithm after the former 8-bit MD5 algorithm, Password

Copy code code as follows: '-------------------------------------------------------------- dbname = ".. /data/flash.mdb "' Change the location of the database file, strongly recommends that you change to an. asp file! Set Conn =

'********************************************** ' VBS CACHE Class ' attribute valid, available, judged before value ' attribute Name,cache name, assign value after new object ' Method Add (value, expiration time), set cache content ' Property value,

The code I have optimized, the test passed Main idea: Use a statement statistics (count) out of the number of records (but not the query to get the RecordCount property), the slow presence of Cookies, jump without the statistics. Use ADO's

ASP in the most headaches is the debugging process is inconvenient, I think many friends will use such a method "Response.Write", and then output related statements to see whether the correct. A few days ago wrote a thousands of lines of the page,

ASP in the most headaches is the debugging process is inconvenient, I think many friends will use such a method "Response.Write", and then output related statements to see whether the correct. A few days ago wrote a thousands of lines of the page,

The federated Array was formerly called the Pl/sql table. Federated arrays cannot be used in tables and can only be used as a structural body for programming. Federated arrays can only be accessed in Pl/sql. It is important to note that some of the

function Checkstr (strname) Strn=trim (Strname.value) Str=trim (Strname.value) For I=1 to Len (str) STRCHECK=ASC (Left (str,1)) If not (strcheck==97) or (strcheck=65) or (strcheckMsgBox ("Do not use characters except English letters and numbers!") ")

Insus.net in the near period of time at the request of friends, write a GridView multi-layer nesting and folding and expansion. This feature of the GridView multi-layer nesting is not a problem, because has done an infinite number of times, but the

  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

How do I invoke netmessagebuffersend to send a message? Problem Description: How do I invoke the API function under WINNT/2K/XP netmessagebuffersend the analog net send command to send a message? Solution: The following code has been

Buy.asp Shopping Blue Src= "Http://edu.cnzz.cn/NewsInfo/file://C:/InetPub/wwwroot/images/title.jpg" > function ID (MYSTR) Pos=0 For I=1 to Len (mystr) If mid (mystr,i,1) = "'" Then If Pos=0 Then Id=left (mystr,i-1) Exit

Functions to modify file-specific content using the FSO function Fsochange (filename,target,string) Dim Objfso,objcountfile,filetempdata Set objFSO = Server.CreateObject ("Scripting.FileSystemObject") Set objcountfile = objFSO.OpenTextFile

Page probably in 99 when the game site, on the release of the article feel trouble, but then play ASP not fine. Just going to use it. In the face of long file 10000 words when the Web page is a large long. Last year, when I was working on a common

Original: Simple and Easy--api file read-write class Http://www.vbgood.com/thread-102870-1-1.html Read this post: Http://www.vbgood.com/thread-99249-1-1.html wrote a simple class that uses the API to read and write files, menial work. The demo code

Encryption | array | String public Function ary (str) Dim A () Dim B () Dim lenstr ' string length Dim I, j ' Loop variable Dim Ouflag LENSTR = Len (str) If lenstr Mod 2 = 1 Then ' The length is singular Ouflag = False LENSTR = lenstr + 1 ReDim A (2,

Templates used in PHP, used phplib used, no he felt very uncomfortable The internet to find no one to write, their own wrote a, ASP level is not high, I hope Can have the master to change. ' ==================================== ' Name:template Class

DataGrid if exists (SELECT * from dbo.sysobjects where id = object_id (N ' [dbo].[ People] and OBJECTPROPERTY (ID, N ' isusertable ') = 1) drop table [dbo]. [People] Go CREATE TABLE [dbo]. [People] ( [Pkid] [INT] IDENTITY (1, 1) not