Code Bank
 
Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
 
 
User Name:
Password:
Remember me
Go Back   ASP Free ForumsProgrammingCode Bank

Reply
Add This Thread To:
  Del.icio.us   Digg   Google   Spurl   Blink   Furl   Simpy   Y! MyWeb 
Thread Tools Search this Thread Rate Thread Display Modes
 
Unread ASP Free Forums Sponsor:
SlickEdit: Code in over 40 languages across 7 platforms. SlickEdit’s unmatched power, speed, and flexibility allows even the most accomplished developers to write better code faster. Download a free trial today!
  #1  
Old February 13th, 2004, 12:57 PM
ricksterval's Avatar
ricksterval ricksterval is offline
Contributing User
ASP Free Newbie (0 - 499 posts)
 
Join Date: Nov 2003
Posts: 31 ricksterval User rank is Just a Lowly Private (1 - 20 Reputation Level) 
Time spent in forums: < 1 sec
Reputation Power: 5
Use System.IO to determine file date to display 'new' image

<!%@ Import Namespace="system.IO" %>
<!%@ Register TagPrefix="Top" TagName="TopStuff" Src="toppage.ascx" %>
<!%@ Register TagPrefix="Bottom" TagName="BottomStuff" Src="bottompage.ascx" %>
<!script language="vb" runat="server">

Sub Page_Load(Sender as Object, E as EventArgs)
...This code tip reads in a directory of files, determines if the file date not older than 180 days and displays various image's. This builds a string and passes it to a Literal control.
[code]
<%@ Import Namespace="system.IO" %>
<%@ Register TagPrefix="Top" TagName="TopStuff" Src="toppage.ascx" %>
<%@ Register TagPrefix="Bottom" TagName="BottomStuff" Src="bottompage.ascx" %>
<script language="vb" runat="server">

Sub Page_Load(Sender as Object, E as EventArgs)
Dim dir As DirectoryInfo = New DirectoryInfo("d:webrootbigdogs")
Dim files As FileInfo() = dir.GetFiles()
Dim count As Integer = files.Length
Dim i As Integer
dim daFiles as string
For i = 0 To count - 1
Dim theDate As Integer = DateDiff(DateInterval.Day, files(i).CreationTime, Date.Today)
If theDate < 180 Then
daFiles = daFiles & "<li><img src=new.gif'><a href='" & files(i).Name & "'>" & files(i).Name & "</a></li>"
Else
daFiles = daFiles & "<li><a href='" & files(i).Name & "'>" & files(i).Name & "</a></li>"
End If
Next

jokes.Text = "</ul>" & daFiles
End Sub
</script>
<html>
<head>
<title>Big Dogs</title>
</head>
<body background="/images/pawsback.gif">
<Top:TopStuff TitleOfDemo=" list new Gif File" runat="server" />

<asp:Literal id="jokes" runat="server" />

<bottom:bottomstuff runat="server" />

</body>
</html>

Read Complete Article

Reply With Quote
Reply

Viewing: ASP Free ForumsProgrammingCode Bank > Use System.IO to determine file date to display 'new' image


Thread Tools  Search this Thread 
Search this Thread:

Advanced Search
Display Modes  Rate This Thread 
Rate This Thread:


Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

vB code is On
Smilies are On
[IMG] code is On
HTML code is Off
View Your Warnings | New Posts | Latest News | Latest Threads | Shoutbox
Forum Jump


Forums: » Register « |  User CP |  Games |  Calendar |  Members |  FAQs |  Sitemap |  Support | 
  
 





© 2003-2008 by Developer Shed. All rights reserved. DS Cluster 3 hosted by Hostway