Hur gör man i ASP.NET att den kollar om filen verkligen finns och om den finns så ska den göra så och om inte så ska den göra så?

If System.IO.File.Exists("c:\autoexec.old") = True Then
'' finns
Else
'' finns inte
End If

Det verkar som att den bara kan läsa filer som ligger på hårddisken.
Det jag är ute efter är en fil som ligger på en FTP/Web server :)

<code>
<%
If System.IO.File.Exists("http://ftp.sunet.se/pub/Office/OpenOffice.org/contrib/rc/1.1.1rc3/OOo_1.1.1rc3_040322_Win32Intel_install_sv.zip") = True Then
response.write ("HEJ HEJ")
Else
response.write ("HEJ DÅ")
End If
%>
</code>

Du kan inte använda detta remote. Det framgick inte att du ville kolla att det var på servern. Då får du istället använda just ftp för att ansluta och sedan söka efter filen.

nu blir detta i C#

<codecsharp>
WebRequest r = WebRequest.Create(@"http://www.pellesoft.se/b545e12nn4.txt");
try
{
// Lyckades .. visa lite info
WebResponse a = r.GetResponse();
foreach(string header in a.Headers)
Console.WriteLine(header + " " + a.Headers[header]);
}
catch(WebException e)
{
// Misslyckades.. visa varför.. kan vara
// för att filen inte fanns (404).
Console.WriteLine(e.Message);
}
</code>

Men den är inte så avancerad så du borde klara porta den utan proglem..

//Andreas

Hmm jobbar i VB och inte C#

Om jag förstår dig rätt så kollar du läsningen på en fil.
Kan den läsa så finns den
kan den inte läsa filen så finns den troligen inte där??

Frågan är att många har ju en skicka vidare så det står att tyvärr så hittas den inte eller något annat sådan så det verkar vara en svår nöt att lösa så jag få se vad jag gör :)

Genom att göra

HttpWebRequest myReq =
(HttpWebRequest)WebRequest.Create("http://www.contoso.com/");

dvs konvertera din WebRequest till en HttpWebRequest så kan du använda dig av MaximumAutomaticRedirections och AllowAutoRedirect vilka gör att du kan ta hänsyn till redirections (fowardings)..

//Andreas

Jaha????

Vadå jaha? Detta löser juh frågan om automatisk redirection på filer ? Du kan inte kringå saker som använder en download.aspx fil eller liknande för att skicka tillbaka filer på response strömmen, men vanliga redirects funkar juh fint. Nu har du tillräckligt med kött på benen för att öppna upp dokumentationen och luska ut den sista puzzelbiten också :-D

//Andreas

Jo jag skrev Jaha för jag ska försöka lösa puzzelbiten :)

Jag har lagt in detta
<code>
<%
Dim r As System.Net.WebRequest = System.Net.WebRequest.Create("http://www.pellesoft.se/b545e12nn4.txt")
try
''Lyckades .. Visa lite info
Dim a As System.Net.WebResponse = r.GetResponse()
Dim header As String
For Each(header in a.Headers)
Response.WriteLine(header & " " & a.Headers[header])
Next
catch(e as WebException)
'' Misslyckades.. Visa varför.. Kan vara
'' för att filen inte fanns (404).
Response.WriteLine
(e.Message);
End Try
%>
</code>

resultatet kan du se här
http://www2.hemsida.net/cazz/blandat/test.aspx

Något är fel

äsch.. såg att du hade ändrat
men din deklaration på dim header as String verkar inte ha slagit igenom...

Du skriver i ditt inlägg att du deklarerat "header" som en sting men när man kör din sida så ser man följande

Line 5: Dim a As System.Net.WebResponse = r.GetResponse()
Line 6: Dim header
Line 7: For Each(header in a.Headers)
Line 8: Response.WriteLine(header & " " & a.Headers[header])
Line 9: Next

På Line6 kan vi se att det bara står "Dim header" och inte "Dim header As String" ta en titt på om du verkligen kör den senaste versionen av filen på sin server.

//Andreas

Jo det stämmer men det var bara ett test nu finns den där men samma problem
Sidan ligger på ett webbhotell så jag tror att dom kör den senaste versionen.

Denna koden funkar perfekt i VB.NET

<code>

Imports System
Imports System.Net

Module Module1

Sub Main()

Try
Dim request As WebRequest
request = WebRequest.Create("http://www.pellesoft.se/habab.txt")

Dim response As WebResponse
response = request.GetResponse()

Dim header As String
For Each header In response.Headers
Console.WriteLine(header + ": " + response.Headers.Item(header))
Next

Catch ex As WebException
Console.WriteLine(ex.Message)
End Try

Console.WriteLine("Press any key to quit...")
Console.ReadLine()

End Sub

End Module

</code>

Missförstå mig på rätt sätt nu - du kanske borde sätta dig ner och läsa på lite om grunderna kring VB.NET programmering och .NET programmering generellt. Att försöka kontrollera om en fil finns eller inte på en anna server när man har svårt med t.ex en For Each loop är inte lätt. Jag lovar att du kommer ha mycket lättare att lösa programspecifika problem när du inte behöver kämpa med att få din syntax korrekt.

//Andreas

Jo det ska jag göra när jag har mer tid.
Finns många nyheter i ASP.NET en den gamla hedliga ASP :)

Jo, många nyheter men logiken bakom så gott som allting är samma. Logiken är samma i de flesta språk och om du har kört VbScript i ASP och nu kör VB.NET så är det ingen skillnad alls på varken logik eller syntax. Kunde du looparna i ASP kan du dem i VB.NET.

Så det var inget att skylla på. ;)

/pD
www.pdc.se
www.pdc.se/blog
www.patrik-dahlen.nu

lol nej men tänkte mer på Try och Catch :)

Cazz,

Kan vi räkna denna tråden som löst? Markera den i så fall som detta så vi inte har en massa löste men inte markerade inlägg som ligger o skräpar =)

//Andreas