ASP

Option Explicit Response.buffer=true Response.Expires =-1 Response.ExpiresAbsolute = Now ()-1 Call Com_creatvalidcode ("GetCode") Sub Com_creatvalidcode (PSN) ' Author:layen ' qq:84815733 ' E-mail:support@ssaw.net ' Disable caching Response.Expires =

Class Base64classrem ConstDim sbase_64_characters ' Conversion CodeDim lenstring ' Computes the length of a stringDim icount ' CounterDim ReturnValue ' return ValueDim Tempchar ' Cached charactersDim temps Tutorial Tring ' cache stringDim

Public Function safesql (str)Dim TempStrTempStr = Trim (LCase (str))If TempStr = "" or IsNull (TEMPSTR) or IsEmpty (TEMPSTR) ThenSafesql = ""Exit FunctionEnd IfTempStr = Replace (TEMPSTR,CHR (0), "")TempStr = Replace (TEMPSTR,CHR (), "")TempStr =

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

Dim sSQLDim rsDim ScrlfDim sxmlclearDim srssheadDim srssendSCRLF = Chr &CHR (10) ' Carriage return + linefeedSxmlclear = sxmlclear & ' & ScrlfSrsshead = "" & SCRLFSrsshead = srsshead & "" & ScrlfSrssend = ""Response.charset= "gb2312"

ASP parsing xml file Sub GetUserInfo ()Dim Rs,sqlXmldoc.loadxml "dvbbs0 "SQL = "SELECT top 1 * nc_user WHERE username= '" & Newasp.checkbadstr (UserName) & "'"Set Rs = Newasp.execute (SQL)If not rs.eof and not rs.bof

Description of the ASP's classes that manipulate XML:Can complete the ASP to the XML node add, delete, modify, empty.For the above operation, according to the conditions, the operation type includes: Only the first one meets the condition, and all

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

1. How to pull the scroll bar, the background image does not move? Answer: 2.SQL Server database, want to use the OLE DB database, please you shrimp advice, how Lian Ah? Answer: Set Cn=server.createobject ("Adodb.connection") Cn.provider= "SQLOLEDB"

ASP is Microsoft's launch of a server-side command execution environment, which allows you to easily create interactive Web applications. As one of the most widely used technologies for developing Web servers on NT platforms, its emergence replaces

Today's commercial websites, or personal websites, all have customer surveys. User registration and other things will inevitably use forms. Are these forms correct, it is obviously controlled by writing code. I admit that writing code is an

In the previous section, our news system has been able to add and delete news online, but this is not enough, some users may need to find related news entries in a previous topic. However, a News system that is better than others can't help but

Create a paging program using ASPWodeail · CPCW     Are you worried about the tedious work of repeatedly linking previous pages and next pages for the sake of too many articles on your site? Now with ASP, as long as your homepage Supports ASP, you

The button menu can be seen on many websites, such as Microsoft's SQL Server website. When you move the mouse over the menu button, it will float and press the mouse button to sag down. The following figure shows the actual effect of this menu. On

Network friends who often make waves on the Internet may be afraid that few will not go to the chatting room.You only need to stay a little bit, and then you will find that most of the chatting rooms use CGI program or JAVA-based Applet

1. This is also the simplest method. Two input parameters have no return value:Set connection = server. createobject ("adodb. connection ")Connection. open someDSNConnection. Execute "procname varvalue1, varvalue2"'Clear all objects as nothing and

Asp when using components to upload, a little trouble is not know the upload progress is how much, although some provide the upload progress bar, such as abcupload (Download Address: http://www.websupergoo.com progress ), it is a progress page

'Define the function and use ADODB. Stream to read binary data.Function ReadBinaryFile (FileName)Const adTypeBinary = 1Dim BinaryStreamSet BinaryStream = CreateObject ("ADODB. Stream ")BinaryStream. Type = adTypeBinaryBinaryStream. OpenBinaryStream.

Use ASP to generate image color verification codes49 lines of code, three filesAsp File: Code. AspData File: body. Fix, Head. FixDownload: download the packageUsage: Option ExplicitResponse. buffer = trueNumCodeFunction NumCode ()Response. Expires =-