Home > Developer > .Net Core

An asp + version of Active Server Explorer

Source: Internet
Author: User
Developer on Alibaba Coud: Build your first app with APIs, SDKs, and tutorials on the Alibaba Cloud. Read more ＞

/*
Tofu is made of excellent products
Http://www.asp888.net bean curd technology station
Retain the copyright information if reprinted.
*/
Many people may have used the ase output by chinaAsp to perform various operations on files on the server. Here we also come
I will talk about a program to implement ase in asp plus. Due to the rush of time and originally for demonstration purpose, this program only demonstrates the simplest situation. As for uploading and editing text files have already been mentioned in, you can go to http://www.asp888.net to view the article in the technical Column
First, list the drive letters on the machine.
<% @ Page Language = "C #" %>
<% @ Import Namespace = "System. IO" %>
<%
String [] LocalDriver = Directory. GetLogicalDrives ();
Int intNum = LocalDriver. Length;
Response. Write ("<ul> ");
For (int I = 0; I <intNum; I ++)
{
%>
<Li> <a href = "dir. aspx? Dir = <% = Server. UrlEncode (LocalDriver [I]) %> "> <% = LocalDriver [I] %> </a> </li>
<%
}
Response. Write ("</ul> ");
%>
List the directories on the selected drive letter
<% @ Page Language = "C #" %>
<% @ Import Namespace = "System. IO" %>
<%
String strDir2List = Server. UrlDecode (Request. QueryString. Get ("dir "));
Directory thisOne = null;
Try
{
ThisOne = new Directory (strDir2List );
// Obtain the Current Directory Creation Time
Response. Write ("<p> Current Directory:" + thisOne. ToString () + "</p> ");
Directory [] Dir = thisOne. GetDirectories ();
Response. Write ("<ul> ");
For (int I = 0; I <Dir. Length; I ++)
{
Response. Write ("<li> <a href =" dir. aspx? Dir = ");
Response. Write (Server. UrlEncode (Dir [I]. FullName ));
Response. Write (""> "+ Dir [I]. Name );
Response. Write ("</a> <br> ");
}
Response. Write ("</ul> ");

File [] Files = thisOne. GetFiles ();
Response. Write ("<ul> ");
For (int I = 0; I <Files. Length; I ++)
{
Response. Write ("<li> <a href =" viewfile. aspx? File = ");
Response. Write (Server. UrlEncode (Files [I]. FullName ));
Response. Write (""> "+ Files [I]. Name );
Response. Write ("</a> <br> ");
}
Response. Write ("</ul> ");
}
Catch (Exception e)
{
Response. Write ("error: <I> ");
Response. Write (e. ToString () + "</I> ");
Response. End ();
}
%>
View the file details:
<% @ Page Language = VB %>
<% @ Import Namespace = "System" %>
<% @ Import Namespace = "System. IO" %>
<Html>
<Head> <title> edit file </title> <Body>
<%
Dim File as string
File = Request. QueryString. Get ("file ")
ThisOne = new File (File)
String File = Request. QueryString. Get ("file ");
File thisOne = new File (File );
%>
<Table>
<Tr> <td> file Name: </td> <% = thisOne. Name %> </td> </tr>
<Tr> <td> full name of the file: </td> <% = thisOne. FullName %> </td> </tr>
<Tr> <td> directory: </td> <% = thisOne. DirectoryName %> </td> </tr>
<Tr> <td> File Creation Time: </td> <% = thisOne. CreationTime. ToString () %> </td> </tr>
<Tr> <td> file size: </td> <% = thisOne. Length. ToString () %> Bytes </td> </tr>
<Tr> <td> last access time: </td> <% = thisOne. LastAccessTime. ToString () %> </td> </tr>
<Tr> <td> Last Update Time: </td> <% = thisOne. LastWriteTime. ToString () %> </td> </tr>
</Table>
<%
Ss = split (thisOne. Name ,".")
Fileent = lcase (ss (ubound (ss )))
If fileent = "txt" or fileent = "asp" or fileent = "aspx" then
TheReader = thisOne. OpenText ()
Do
StrIn = theReader. ReadLine ()
Response. write (strIn)
Loop Until strIn = Null

%>
<Form action = "savefile. asp" method = post>
<Textarea cols = 40 rows = 30> <% = strIn %> </textarea>
<Input type = hidden name = filename value = "<% = thisOne. FullName %>">
<Br>
<Input type = submit value = "Save changes">
</Form>

<%
End if
%>
</Body>
</Html>
Well, a complete ase program also needs to delete, copy, move, and upload and edit files. I believe that after reading this program, you will surely find a way to implement it through simple changes.
The complete example of this program can be downloaded in http://www.asp888.net/download/asp/ase.zip
Thank you!

Author: tofu ()


This article is an English version of an article which is originally in the Chinese language on aliyun.com and is provided for information purposes only. This website makes no representation or warranty of any kind, either expressed or implied, as to the accuracy, completeness ownership or reliability of the article or any translations thereof. If you have any concerns or complaints relating to the article, please send an email, providing a detailed description of the concern or complaint, to info-contact@alibabacloud.com. A staff member will contact you within 5 working days. Once verified, infringing content will be removed immediately.

Related Keywords:
asp version newest version of windows server current version of windows server server explorer what is latest version of windows server veeam explorer for microsoft active directory next version of windows server release date
Related Article
asp.net Core Data protection (the data Protection cluster sce...
asp.net core-authorize characteristics
Micro-service Monitoring zipkin+asp.net core
Combine ASP NET Core and SQL Server with Docker Compose
ASP. net mvc creates 404 jump instances (not 302 and 200), mv...
Comparison between Orchard and ABP architectures (aspnetboile...

Contact Us

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.

What's Trending
Top 10 Tags
datastax versions naming convention zookeeper client class definition md5 microsoft sql server 2005 data structures exception handling error handling
Top 10 Keywords
microsoft download center down wordpress address url site address url wordpress address url windows installer 4 0 download 302 not found web address url definition site address url wordpress db2 integer mac os installation step by step pdf abbreviation for return

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

Get Started for Free

  • Sales Support

    1 on 1 presale consultation

    Chat Contact Sales

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

    Open a Ticket

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.

    Learn More