CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg
Cookie ikon
Avatar billede lazer Nybegynder
15. september 1999 - 12:50 Der er 7 kommentarer og
1 løsning

Link til fil men fjern Endelse.

Hej
Jeg har lavet en side der linker til en fil. fx.: "Kylling.002"
Men .002 er et versions nummer, og det kan skifter til 003, oo4 osv. Men jeg vil ikke ændre mit link på siden.
Jeg ved at man kan bede om at fjerne noget af fin navnet. så min link kun beder om "Kylling".
Men jeg ved ikke hvordan.
Her er den del der linker:
<td WIDTH="18%"><font SIZE="2"><p ALIGN="CENTER"><a href="file://ABC/Abcapblk.004" target="_self">ABCA-P-BL-K</a></font></td>

Hvad gør jeg for at få den til at kunne finde filen selv om den er omdøbt til "Abcapblk.005"?
Mvh. Lazer
Avatar billede Dan Nim Seniormester
15. september 1999 - 13:00 #1
1)Find ud af hvor mange bogstaver fil navnet er lang (via Len(filnavn)

Lav så en :

Response.write mid(filnavnet,1,len(filnavn)-4)

så skriver den kun filnavnet, ikke endelsen
Avatar billede lazer Nybegynder
15. september 1999 - 13:50 #2
Jamen kan den så læse filen fra drevet?
Skal den ikke hedde:
Response.write right(filnavnet,1,len(filnavn)-4)
?
Kan du eller en anden ikke lave et program eksempel ud fra det eksempel som jeg lavede først?
Please!

Avatar billede Dan Nim Seniormester
15. september 1999 - 13:55 #3
hvad skal det script gøre, sig mig det..så kigger jeg på det.
Avatar billede lazer Nybegynder
15. september 1999 - 14:04 #4
Scriptet skal hente en fil hedder fx: c:\kurt\bent.002

Men hvis filen omdøbes til bent.003 så skal linket stadig fungere på siten.

Derfor skal Scriptet kunne hente filen ud fra de 4 første karaktere altså "bent"

Kan det lade sig gøre?
Avatar billede mjess Nybegynder
16. september 1999 - 08:13 #5
Følgende kode gennemsøger folderen 'download' for filer, hvis navn starter med "bent.", og skriver et link til den sidst fundne fil, der passer.


Dim fs, path, DownloadFolder, FileColl, link, linkname

Set fs = CreateObject("Scripting.FileSystemObject")
path = Server.MapPath("download")

Set DownloadFolder = fs.GetFolder(path)
Set FileColl = DownloadFolder.Files
For Each file in FileColl
    If Left(file.name, 5) = "bent." Then
        link = "download/" & file.name
        linkname = file.name
    End If
Next

Response.Write "<A HREF=""" & link & """>" & linkname & "</A>"
Avatar billede lazer Nybegynder
16. september 1999 - 08:50 #6
Hej Mjess.
Jeg har brugt dit eksempel:

<html>

<head>
<title>New Page 2</title>
<meta name="GENERATOR" content="Microsoft FrontPage 3.0">
</head>

<body>
<%
Dim fs, path, DownloadFolder, FileColl, link, linkname

Set fs = CreateObject("Scripting.FileSystemObject")
path = Server.MapPath("Server\folder\folder\Abc\")

Set DownloadFolder = fs.GetFolder(path)
Set FileColl = DownloadFolder.Files
For Each file in FileColl
If Left(file.name, 9) = "Abcafmix." Then
link = "Server/folder/folder/Abc/" & file.name

linkname = file.name

End If
Next

Response.Write "<A HREF=""" & link & """>" & linkname & "</A>"
%>
</body>
</html>

Men det virker ikke. Gider du rette det til?
Jeg bliver vist nødt til at give dig mindst 100 Points, hvis du får det til at virke.
Mvh. Lazer
Avatar billede lazer Nybegynder
16. september 1999 - 08:58 #7
Det er en anden server som filen ligger på, så hvis du gider skrive stien, korrekt. Jeg tror at det er en af problemerne.
Lazer
Avatar billede mjess Nybegynder
16. september 1999 - 10:53 #8
lazer

Beklager, men jag mener ikke at man kan gøre det, når filen/filerne er placeret på en anden server.
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra ASP kategorien

Titel Indlæg Oprettet Seneste aktivitet
Classic - filer vist med sidste fil først Af bsn i ASP 5 23/05/202409:56 24/05/202400:02
Optimer MySql table med ASP Af poulmadsen i ASP 4 26/04/202417:16 26/04/202418:37
JSON Af ingeman i ASP 3 07/04/202417:53 08/04/202412:09
Vis detaljeret fejlkoder Af poulmadsen i ASP 6 09/03/202418:16 10/03/202417:59
IIS virker ikke på asp sider... Af bsn i ASP 10 15/10/202313:12 18/10/202308:48
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester



Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I dag 18:09 Kan ikke fildele fra PC til PC Af gertLundberg i LAN/WAN
I dag 17:33 Facebook kopier en tråd Af clausito i Sociale medier
I dag 09:49 Indtogs sejlads : OL i Paris : Hvornår kom Danmark ? Af Ikke-ekspert i Fri debat
I dag 03:28 Inkasso som privat? Af lekor adams i Fri debat
I går 23:51 Frossen cursor Af goglov i PC
White papers
Flere white papers »


Premium
Teaser billede
Nordjyske MapsPeople ruster op til opkøb af konkurrenter: "Vi vil vinde det her kapløb"
Læs mere »
Microsoft tager til genmæle: Vores licenspraksis skaber ikke unfair konkurrence
Færre unge studerende på landets it-uddannelser: "Vi afviser dem der, hvor de har lyst til at læse"
Overblik: Sådan forløb årets største databrud - mindst 165 organisationer ramt
Se alle »
Computerworld
Teaser billede
Elon Musk dropper CrowdStrike efter kæmpe nedbrud
Læs mere »
Apples spritnye app til kodeord kommer til iOS 18: Sådan virker den
Med SearchGPT har verden fået en spritny søgemaskine: Kan den true Googles dominans?
Apples folde-iPhone tager form: Her er planerne
Se alle »
CIO
Teaser billede
Så mange Microsoft-enheder blev ramt af gigantisk Crowdstrike-koks
Læs mere »
Telenor skrotter ældre it-system: Nyt system er en hyldevare
Derfor står Danske Bank foran en kæmpe AWS-transformation: Ellers skulle vi bygge en ny infrastruktur for at følge med
Microsoft kaster milliardbeløb efter nye tiltag til partnerprogrammet: Partnerne kan nu tjene endnu flere penge
Se alle »
Job & Karriere
Teaser billede
Efter 12 år er NNIT's hovedkvarter i Søborg nu ryddet og tomt - alle arbejder hjemme: "Det er med et vist vemod"
Læs mere »
Dansk top-profil trækker sig fra Microsoft: Skal være direktør i TDC Erhverv
KMD-direktør forlader selskabet: Det skal hun nu
IBM Danmark skifter ud i sin øverste ledelse - her er den nye direktion
Se alle »
White paper
Teaser billede
Rapport kortlægger de 13 bedste muligheder for at sætte turbo på din cloud computing
Læs mere »
Sæt turbo på din cloudperformance og minimér risikoen for DDoS-angreb
Sådan får du overblik og beskytter dine cloudapplikationer
Samlet platform sikrer sammenhæng, kontrol og sikkerhed i hybrid cloud
Se alle »

Events
Flere events »
White papers
Flere white papers »
IT-Kurser
Se alle vores it-kurser »