Use flash and ASP to make a message this-flash article
About writing data to flash with ASP: for example, to let flash know a=1 this value, you have to enter &a=1°asp with such a statement Response.Write ("&a=1").
The introduction of ASP files in
Google to the PR query encryption, ASP version of the PR query code is very rare, today found a, to the need for the webmaster, complete code as follows:function Hexdec (str){return parseint (str,16);}function Zerofill (a,b){var z = hexdec (80000000)
Using Global.asa correctly is a common problem for ASP developers. The main thing is to know when to use virtual application, when to use virtual directory, and to know their differences.
Virtual directories (dummy directory)
In short, virtual
ASP user Online program, this is My Learning ASP write a user online judge program.
Sub Check ()Dim ipCall Opensql ()Ip= "SELECT * from online where ip= '" &request. ServerVariables ("REMOTE_ADDR") & "'"Set Rs=server. CreateObject ("Adodb.recordset"
Dim Url,strurl,strpath
Dim Strinceptfile
Strinceptfile = "SWF,FLA,JPG,JPEG,GIF,PNG,BMP,TIF,IFF,MP3,WMA,RM,WMV,MID,RMI,CDA,AVI,MPG,MPEG,RA,RAM,WOV,ASF"
url = replace (replace (Request ("url"), "'", ""), "%", "" "," "," "/"
If Len (URL) > 3 Then
If
A stored process with a return valueWhen doing something like SP2, you should take full advantage of SQL Server's powerful transaction processing capabilities to maintain data consistency. Also, we may need the storage process to return to execution,
Dim rs,sql,htmlcontent
Dim Channelrootdir,strinstalldir,strindexname
Dim flashid,downid,showurl,errmsg
Dim Strtitle,straddress,addtime
Dim allhits,introduce,filesize
Dim Htmlfileurl,htmlfilename,strurl
Newasp.readchannel (Channelid)
Channelrootdir =
ASP calls the size of the picture
function Resizeimage (imageid,limitwidth,limitheight){var image = new Image ();IMAGE.SRC = IMAGEID.SRC;if (image.width if (image.width/image.height >= limitwidth/limitheight){if (Image.width >
ASP Multilevel Linkage Menu
Dim xmldoc, Parentcode, code' Dim root as IXMLDOMElement' Dim Newelem as IXMLDOMElementResponse. ContentType = "text/xml" ' Output format is XML
Parentcode = Request ("Parentcode")If Parentcode = "" ThenResponse.Write ""
keywords: asp upload asp image Batch upload batch upload file asp upload file asp file upload code PHP document bulk upload
Okay, now we're going to look at the upload.asp file. The code for this file is primarily an upload form.
input
Text box:
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
/**--------------------------------------------------------------------** Create a XMLHTTP instance*return object is successfully created to return a XMLHTTP instance, otherwise it returns false**------------------------------------------------------
'------------------------------------------------------------
'------------------------------------------------------------CLASS paginationPublic PageSize ' How many records are displayed per pagePublic AbsolutePage ' current pagePublic BaseURL '
IIS server error 500 2 Error Cause: 500 error is generally caused by an error in the source program.3. Solution: 1. First, set Internet Explorer & agrave; Tools> Internet Options. 2. If you refresh or re-open the 500 error page, the error program
The content source of this page is from Internet, which doesn't represent Alibaba Cloud's opinion;
products and services mentioned on that page don't have any relationship with Alibaba Cloud. If the
content of the page makes you feel confusing, please write us an email, we will handle the problem
within 5 days after receiving your email.
If you find any instances of plagiarism from the community, please send an email to:
info-contact@alibabacloud.com
and provide relevant evidence. A staff member will contact you within 5 working days.