chr

I'm trespassing. Step High website 2004-10-09 13:05 Actually, it's not a new loophole. I have already invaded the website of the step high  just recently study more nervous has not released  Everybody go to http://www.cnbbk.com/hacked.htm and

' Determine if the file name is legitimateFunction Isfilename (Afilename)Dim Serrorstr,inamelength,iIsfilename=trueSerrorstr=array ("/", "\", ":", "*", "?", "" "" "," "," | ")Inamelength=len (Afilename)If inamelengthIsfilename=falseElseFor I=0 to

When you write a page with ASP, if it involves sending a message, you will normally be asked to enter your email address. Wrong email address often brings a lot of unnecessary trouble, use the following function IsValidEmail can determine an email

The previous section has introduced a database connection for article management, and this article will cover the online additions to the article. When you find a good piece of information, and want to put it on your site as soon as possible, if you

In front of the article for you to introduce the online add and save, but if this is not enough, because a lot of the article itself with the HTM code must be fully displayed, rather than show its effect, which means that the HTM code must be

This is one of the main features of this program. In ASP, you can make use of NT SMTP to send Mail Online, but you must confirm that your system has installed the Windows NT Opton PACK SMTP SERVICE, in this article management system is through it to

After the addition of the article, save, display, so now it's time to talk about the management of the display of the main page, that is, to display the title of all articles connected to facilitate the viewer to find articles, it should have the

Chat room ' Get the speech content and filter the script statements in it Usersays=request.form ("says") If InStr (Usersays, "script") 0 Then Usersays= "" End If ' To judge whether there is a conversation or not to deal with it If Len (usersays) "0

Source code ' ================================================================================================== Case "Write" '================================================================================================== ' Publish an article %>

Upload

Dim id Id=request.querystring ("id") Dim Myfso Set Myfso=createobject ("Scripting.FileSystemObject") If Myfso. FileExists (Server.MapPath ("./news_content/" &id& "TXT")) Then Myfso. DeleteFile (Server.MapPath ("./news_content/" &id& ". txt")) ' #####

Advertising three, display ads This part of the procedure mainly has the following four purposes: first, refer to the display level of each advertisement, randomly select the display of the advertisement; second, update the display number of the

Advertisement second, management function There are 12 ASP files in the Management Section, and the main functions of these scripts are as follows: Banneradminlogin.asp: Login page for admin function. The default user name is "ADMIN user" and the

Coding | conversion encoding conversion between gb2312 and Unicode The following example is to convert gb2312 to "whole" in this form php4.3.1 later Iconv function is very useful, just need to write a uft8 to Unicode conversion functionTabular (gb231

function | data | database Discuz 5.0 do not use their own IP data, but the use of pure IP data format, access to the pure IP database a little trouble, its storage format is more special and interesting, the specific format of the analysis of the

php5| Application Demo I. Prior knowledge: What is rs232/rs484 and its application? QUOTE:RS232 interface is a serial port, computer chassis rear of the 9-core (or 25-core) socket, next to the general has "| o| o| "Sample identification.The

Part II: Examples Project structure: The project consists mainly of several ASP files and a database: Book.mdb: Storing the contents of a database Index.asp: The main document of the website, most of the content is displayed by it Buy.asp: The

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

Active Server Pages Password Script Sub forminput ()%> generic logon User name: Password: ' *********** Password Login Code ********************* ' *********** programmed by Robert Robbins ************ ' *********** ' 03/28/99 *************

Getfile.htm ------------------------- save pictures to database you can find a picture to try, after saving will be prompted email: " Picture: Savetodb.asp ---------------------------------- Response.Buffer =