Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

ASP VB.NET ¿Í»§¶ËÉÏ´«Îļþµ½·þÎñÆ÷¶Ë

  Dim strPath As String = Server.MapPath("~\Îļþ¼Ð")
        'Åжϱ£´æÎļþ·¾¶ÊÇ·ñ´æÔÚ ²»´æÔÚÔò´´½¨
        If Not Directory.Exists(strPath) Then
            Directory.CreateDirectory(strPath)
        End If
        Dim PATH As String = Server.MapPath((FileUpload1.FileName))
        'Èç¹ûÎļþ´æÔÚ ÔòÉÏ´«
        If (FileUpload1.HasFile) Then
            FileUpload1.PostedFile.SaveAs(PATH)
        End If
        'Ò»:ÏȰÑEXCELµ¼ÈëdateView
        '¶þ:È»ºó½«dateViewÀïµÄÊý¾Ýµ¼Èëµ½Êý¾Ý¿âÀïÃæ
        'EXCEL µÄÁ¬½Ó´®
        Dim sConnectionString As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                                          "Data Source=" + PATH + ";" & _
                                          "Extended Properties=Excel 8.0;"
        '½¨Á¢EXCELµÄÁ¬½Ó
        Dim objConn As New OleDbConnection(sConnectionString)
        objConn.Open()
        Dim objCmdSelect As OleDbCommand = New OleDbCommand("SELECT


Ïà¹ØÎĵµ£º

ASP¿Ø¼þ´óÈ«½²½â

4.1 ³£ÓõÄHTML¿Ø¼þ
4.1.1 ±íµ¥¿Ø¼þ
ÓÃÓÚ½ÓÊÕ¿Í»§¶ËµÄÊäÈ룬²¢½«ÊäÈëµÄ½á¹ûÌá½»¸ø·þÎñÆ÷´¦Àí
1.HtmlForm¿Ø¼þ
 ËùÓеÄWeb Form¿Ø¼þ±ØÐë°üº¬ÔÚÒ»¶ÔHtmlForm¿Ø¼þ±êÇ©ÖÐ
<Form
   Id = "¿Ø¼þ±êʶ"
   Runat = "Server"
   Method = "Post | Get"
   Action = "ÒªÖ´ÐÐ ......

±à³ÌÈí¼þaspºÍasp.netµÄÇø±ð


»ú¹¹Ãû³Æ£º    ÈÕÆÚ£º2009 - 09 - 14    ²é¿´´ÎÊý£º
334 ´Î
        ASP.NetºÍASPµÄ×î´óÇø±ðÔÚÓÚ±à³Ì˼άµÄת»»£¬¶ø²»½ö½öÔÚÓÚ¹¦ÄܵÄÔöÇ¿¡£ASPʹÓÃVBS/JSÕâÑùµÄ½Å±¾ÓïÑÔ»ìºÏhtmlÀ´±à³Ì£¬¶øÄÇЩ½Å±¾ÓïÑÔÊôÓÚÈõÀàÐÍ¡¢ÃæÏò½á¹¹µÄ±à³ÌÓïÑÔ£¬¶ø·ÇÃæÏò¶ÔÏó£¬Õâ¾ÍÃ÷Ï ......

[VB]¼òµ¥Timer

Public Class Form1
Dim x As Integer
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
x = 1
Timer1.Interval = 1000
Timer1.Start()
End Sub
Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e ......

ÌÔÌØËÑË÷ÒýÇæÔÚÌÔÌØAsp CmsϵÄÓ¦ÓÃ


1¡¢Ê×ÏÈÏÂÔØÌÔÌØÕ¾ÄÚËÑË÷ÒýÇæ£¬Ê×ÏÈÒªµ¼ÈëCMSÖеÄÊý¾Ýµ½ËÑË÷ÒýÇæË÷ÒýÖУ¬Õâ¸ö¹¤×÷Äú¿ÉÒԷŵ½±¾µØÀ´×ö£¬Ë÷Òýºó£¬Ö±½Ó½«ÌÔÌØËÑË÷ÒýÇæÎļþ¼ÐѹËõºóÉÏ´«µ½ÄúµÄ¿Õ¼äÉϼ´¿É¡£
2¡¢Êý¾ÝË÷Òý˵Ã÷£º
3¡¢Ê×ÏÈÔÚ±¾µØ²¿ÊðÒ»¸öasp.net»·¾³£¬È»ºó°²×°ÌÔÌØÕ¾ÄÚËÑË÷ÒýÇæ£¬¼ÙÈç·ÃÎʵØÖ·ÊÇ:http://localhost¡£
4¡¢ÏÂÃæÊäÈëµØÖ·£ºhttp://lo ......

ASP VB.NET ÏÂÔØ·þÎñÆ÷Îļþµ½¿Í»§¶Ë


      Try
            Dim Path As String = Server.MapPath("~/Download/") 'Îļþ·¾¶
            Path = Path & "file.txt" 'ÎļþµÄÃû³Æ
     ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ