ASP

FSO, as exciting as the UFO, fascinating, of course, more people are happy to let people worry. You do not see a space service provider advertising: 100MB space as long as 60rmb/years, supporting the database, support what what ... A question does

Password login test after running test.htm ~! -------------------------test.htm code is as follows: marginheight= "1" border= "0" scrolling= "no" > --------------------------test.asp code is as follows: ' This code is only for attack the

The code is as follows Copy Code Call Com_creatvalidcode ("code") Sub Com_creatvalidcode (PSN)' Disable cachingResponse.Expires =-9999Response.AddHeader "Pragma", "No-cache"Response.AddHeader "Cache-ctrol", "No-cache"'

This search tool allows you to search for words or phrases on your site, and the resulting page will display the title of your visitors page and a link to it.You only need to include bellows in the form of your Web page: HTML page. Search term or

ASP Simple Chat Room program two var nothing;Response.AddHeader ("Cache-control", "No-cahce");if (! Session.Contents ("Chat_user")){Session.Contents ("chat_user") = "Guest";Session.Contents ("chat_time") = (new Date). GetTime ();}if

ASP read picture or flash height wide, Function Getflashandpic (url,height,width)Dim sextname,extname,strtempsextname = Split (URL, ".")Extname = Sextname (UBound (sextname))If LCase (extname) = "swf" Thenstrtemp = " "Elsestrtemp = " "End

'======================================================' File name: inc/clsjpeg.asp' File function: Watermark + thumbnail class' Last Updated: 2008.08.02'====================================================== Dim

Last time I wrote a long PHP article pagination code used to explode to the implementation of segmentation, today we talk about ASP article pagination code and long article pagination and ASP long article pagination method. Function c2u (MyText)Dim

Function Removespan (ByVal strcontent)Dim Objreg, strtmpIf strcontent= "" OR ISNull (strcontent) Then Exit FunctionSet objreg=new REGEXPObjreg.ignorecase =trueObjreg.global=trueObjreg.pattern= "]*) >| "Strtmp=objreg.replace (Strcontent, "")Set

Set Upload=new Upload_fileIf Upload.form ("act") = "UploadFile" ThenFilepath=trim (Upload.form ("filepath"))Filelx=trim (Upload.form ("Filelx"))I=0For each formName in upload. FileSet File=upload. File (FormName)Fileext=lcase (file. Fileext) ' The

On Error Resume NextResponse.Buffer = TrueDim startimeDim connDim connstrDim Sqldatabase,sql_pass_word,sql_user_id,sql_data_sourceStartime=timer ()Set conn = Server.CreateObject ("ADODB. Connection ")ConnStr = "Provider=SQLOLEDB.1; Password= ' 888885

function Encodestr (str)Str=trim (str)Str=replace (str, "Str=replace (str, ">", ">")Str=replace (str, "'", "" "")Str=replace (Str,vbcrlf&vbcrlf, "")Str=replace (Str,vbcrlf, "")Encodestr=replace (str, "", "")End Function function Ubbcode

function Delectimagefile (newsid,i) Set Delectfile=server. CreateObject ("Scripting.FileSystemObject")Currentpath=server. MapPath ("images/news/")Filename=currentpath & "& NewsID &"-"& I &". gif " If Delectfile.fileexists (FileName)

function get_substring (str,length)Dim resultresult = StrIf Len (str) >length Thenresult = Left (str,length-1) & "..."End IfGet_substring = resultEnd Function function GetPage (page)Dim resultIf IsNull (page) or IsEmpty (page) or (not IsNumeric

But when you modify the database how to let application update, this article provides you with a reasonable solution, If anyone has a better algorithm, please post a discussion, thank you --> Class wawa_app_getrows Public Function wawa_get_list

ASP Programming Essentials ABC Using Server.MapPath Use Server.MapPath () as much as possible to represent files stored on the server, rather than static absolute paths. Because, if you take a static absolute path, when the Web path changes, it will

Active Server pages enables dynamic pages to be executed quickly, but by adding skills to the connection to the database in your code, you can make the program execute faster. This is an article on how to refine the script and ASP features to

This is based on the user's choice whether to allow the user name password to be saved in the cookie Oh, we pay special attention to the code blue codes Oh. Set Rs=server.createobject ("Adodb.recordset")Exec= "SELECT * from Yrwl_tb_admin where yhm=

'==================================================' Procedure name: Saveremotefile' Function: Save remote files to local' Parameter: localfilename------local filename' Parameter: remotefileurl------remote File URL'===================================

Option ExplicitResponse.buffer=trueNumcodeFunction Numcode ()Response.Expires =-1Response.AddHeader "Pragma", "No-cache"Response.AddHeader "Cache-ctrol", "No-cache"Dim znum,i,jDim ados,ados1Randomize TimerZnum = CInt (8999*rnd+1000)Session ("GetCode"