שלח תשובה

זירת השאלות

424
צפיות
4
תשובות

FSO איך?

,‏ 28 באוקטובר, 2004

לקחתי את הקוד הזה:


<%
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(Server.mapPath("\"))
Set files = folder.Files

dim c :c=0
For Each file in Files
Response.Write file.Name & "<BR>"
c=c+1
Next

Response.Write("<br><b>Total Files</b>: "& c)
Set files = Nothing
Set file = Nothing
Set fso = Nothing
%>


הזה מהאתר ואני רוצה לדעת איך אני יכול לעשות שזה יבחר רק סוגי קבצים
ספציפים שאני מגדיר מראש למשל:
*.jpg, *.gif
וכאלה…
תודה מראש

תגיות:

4 תשובות

  1. BuildHome הגיב:

    תשובה
    For Each file in Files
          If Right(File.Name,3) = "jpg" or Right(File.Name,3) = "gif" Then
                Response.Write file.Name & "<BR>"
                 c=c+1
          End If
    Next

  2. qazwsx הגיב:

    תודה על התשובה המהירה תותח אתה:)

  3. qazwsx הגיב:

    שאילתה SQL
    שאני מריץ את השאילתה הזאת:


    sql="update movies set time='" & time2 & "' where id=" & ID & ";"

    זה נותן לי את ההודעת שגיאה הזאת:


    Error Type:
    Microsoft OLE DB Provider for ODBC Drivers (0x80040E14)
    [Microsoft][ODBC Microsoft Access Driver] Syntax error in UPDATE statement.

    מישהו יודע מה הבעיה?
    שאני מכניס את אותו הערך דרך


    rs.addnew
    rs("time")=time2
    rs.update

    זה עובד טוב…
    תודה מראש

  4. BuildHome הגיב:

    time מילה שמורה
    sql="update movies set [time]='" & time2 & "' where id=" & ID & ";"
    כל מילה שמורה צריכה להיות בין סוגריים מרובעות (יש מאמר באתר שמציג את כל המילים השמורות).

שלח תשובה