Database field: ID (automatic number), class_name (menu name), parentid (parent menu ID)
CopyCode The Code is as follows: Dim m
M = 0
Call showtree (0) %>
Sub showtree (parentid)
Dim s
M = m + 1
Dim rs
Set rs = server. Createobject ("ADODB.
Yemeng provides m free ASP space, supports ASP, HTML, FTP, and Web management, and supports online data backup and recovery, supports activation of background message books, generation of online counters, and support of FSO + Access (MDB) databases,
To debug an Asp.net project, you need to create a virtual directory with the same name as the project.
To change the project name, do the following to avoid errors:
1. Open Web. csproj. webinfo in notepad and replace the virtual directory path
'-------------------------------------------------
'Function name: ReadTextFile
'Purpose: Use the AdoDb. Stream object to read text files in UTF-8 format
'----------------------------------------------------
Function ReadFromTextFile (FileUrl,
It is used to generate sitemap. xml files, facilitating crawling by google and other search engines.
Copy codeThe Code is as follows: Server. ScriptTimeout = 50000
'Sitemap_gen.asp
'A simple script to automatically produce sitemaps for A webserver,
One method is to use Index Server query object and parameters:
Set Q = Sever. CreatObject ("ixsso. Query ")
'Create a query object.Set Util = Sever. CreatObject ("ixsso. Util ")Q. Query = Request ("SearchString ")
'Query the field.Q. SortBy =
Q: Why does my RecordCount always return-1?A: You should use this mode to open the record set for database access:
Rec. open strSQL, conn, 1, 1
StrSQL is the SQL statement used to operate the database, and conn is the Connection variable used to
Dim varInitial_TimeVarInitial_Time = TimerResponse. Write "Initial_Time = [" & varInitial_Time & "] "%>
For I = 1 to 10Response. write "Dancing With The Wind (www.intels.net) fashion consulting personal website welcome you! "& I &" "Next%>
you
Copy codeThe Code is as follows: strSourceFile = Server. MapPath (dataxml & "/Advertisement/" & id & "/adv. xml ")
Set objXML = Server. CreateObject ("Microsoft. XMLDOM") 'creates an XML Object
ObjXML. load (strSourceFile) 'reads XML files into
When I started learning xml, I made a simple xml message board.
-------------------------------
Create a new XMLDOM objectServer. createObject ("Microsoft. XMLDOM ")
--------------------------------
Load an xml fileSet objXML = server. createObject
IMG provides 50 m free space to support ASP + PHP
The following are the introductions on their Forum:
Yiwang.com sponsored this forum and paid off everyone's love. Now it is decided to open 50 m free PHP + ASP + FTP all-around space.Space
Brief Introduction: Generally, the homepage of a website has the largest access volume. If the homepage of your website is opened slowly, your customers will leave your website one after another. we usually cache data that requires complex
Author: Gan jiping;
FSO does have some weaknesses-for example, it is difficult to process binary files, including Word documents, many graphical files and other files. However, you can still operate these files in other ways-move them, delete them,
Custom functions used in asp to process file uploads and deletions
'''''''''''''''''''''''''''''''''''''''' '''''''''''''''''''''''''''''''''All custom VBS Functions'''''''''''''''''''''''''''''''''''''''' ''''''''''''''''''''''''''''''''Function
Common functions of ASP.
Dim dbDb = "dbms. mdb"
'*************************************** ***************************'Execute the SQL statement without returning the value. The SQL statement should be as follows:'Update table name set field name =
Code batch modification programs implemented using asp, fso-related
This is a small batch code modification task for your work.Currently, file types that can be processed:. asp. inc. htm. html can be modified and added by yourself.
Function
I have been writing ASP with JS for a long time. It is not a special reason, but I learned JS at the beginning. Later I learned that ASP could also be written with JS, so I didn't learn VBS. when I first learned ASP in the past few months, I
Dim iniPath, iniFileName, iniStr, tmpStr, nDim userName, passWord, tmp
UserName = "myfso222" 'User NamePassWord = "awaysrain" 'passWordTmp = "ai" 'randomly generates two lower-case letters (it should be randomly generated, but I omitted it
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.
A Free Trial That Lets You Build Big!
Start building with 50+ products and up to 12 months usage for Elastic Compute Service