CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

kjeldsen Nybegynder

27. november 1999 - 10:30 Der er 7 kommentarer og
1 løsning

Mere søgemaskine

Er det ikke muligt at lave en søgemaskine/søgefunktion der kun køre på ens egen url, forstået sådan at hele søgefunktionen ligger i et script i en af filerne på ens eget site og ikke involverer andre severe. Og kan man samtidig begrænse søgningen til kun at omfatte nogle bestemte sider på sitet, f.eks. en arrangements-kalender ?

Synes godt om

dkkarpen Nybegynder

27. november 1999 - 13:27 #1

Ja du kan jo bygge din kalender op omkring en database. Den kan du jø så søge i med din sql streng.

Synes godt om

dkkarpen Nybegynder

27. november 1999 - 13:28 #2

jø=jo

Synes godt om

kjeldsen Nybegynder

27. november 1999 - 14:09 #3

Dkkarpen-> Se det oprindelige spørgsmål, svar og kommentarer her:

DHTML/HTML, besvarede spørgsmål, "Mere søgemaskine"

Morten :~)

Synes godt om

s Nybegynder

27. november 1999 - 14:12 #4

Jeg har et script til dette. Det skal bare lige rettes lidt. Jeg vender tilbage.

Synes godt om

s Nybegynder

27. november 1999 - 14:35 #5

Prøv noget i den her retning:

<html>
<body>
<%

'Soeges der i filer eller i mapper (Filer:Mapper)
Soegi = "Filer"
'Hvis der soeges i mapper skal undermapper saa medtages (True:False)
Medtagundermapper = False
'Stien/stierne paa de filer eller de mapper der skal soeges i
thepath = array("/soeg.asp", "/prove.html")
'Ordet der soeges efter (kan skiftes ud med: soegeord = request.form("Soegeord")
'hvis man soeger ud fra en form)
soegeord = "html"
'Hvis der soeges i mapper kan det ikke betale sig at soege i f.eks. *.gif eller *.bmp - filer. Angiv hvilke typer filer der skal soeges i
filetypes = array("asp", "html")

'Dette script er lavet af: Svend Hoestgaard Bang Henriksen, smbang@mail1.stofanet.dk

Set fso = Server.CreateObject("Scripting.FileSystemObject")

if Soegi = "Mapper" then

for b = 0 to ubound(thepath)
path = Server.MapPath(thepath(b))

Set folder = fso.getfolder(path)
Set subs = folder.subfolders
Set files = folder.files

for each x in files
a = split(x.path, ".")
if ubound(a) > 0 then
for e = 0 to ubound(filetypes)
if filetypes(e) = a(ubound(a)) then ftypes = True
next
if ftypes = True then
response.write x.path
if not x.size = 0 then
checkfiles(x.path)
end if
end if
end if
next

if Medtagundermapper = True then

for each x in subs
Call subf(x.path)
next

end if

next

else

for b = 0 to ubound(thepath)
path = Server.MapPath(thepath(b))

Call checkfiles(path)

next

end if

sub subf(folderpath)
for each x in subs
set files = x.files
for each i in files
set f = fso.getfile(i.path)
a = split(i.path, ".")
if ubound(a) > 0 then
if a(ubound(a)) = filetypes then
if not i.size = 0 then
Call checkfiles(i.path)
end if
end if
end if
next
Set subs = x.subfolders
for each q in subs
Call subf(q.path)
next
next
end sub

sub checkfiles(filepath)
set file = fso.opentextfile(filepath, 1, True)
txt = file.readall
if instr(txt, soegeord) > 0 then
response.write "Søgeord fundet i: " & filepath & "<br>"
end if
end sub

%>
</body>
</html>

Synes godt om

kjeldsen Nybegynder

27. november 1999 - 15:19 #6

S-> o.k. så bliver du nødt til at fortælle mig hvad jeg stiller op med scriptet og hvordan jeg definerer hvilke sider der må søges på.

Check evt. http://www.cirkusbygningen.dk og vælg: "Det sker i Cirkusbygningen".
Der på velkomstsiden til kalenderen skal der være et søgefelt og ligeledes på alle kalendersiderne. Det er samtidig de sider man må kunne søge på og ikke andre.

Synes godt om

s Nybegynder

27. november 1999 - 15:22 #7

For det første skal du for at kunne bruge scriptet kalde det for .asp .
Hvordan du definere de forskellige ting er vist beskrevet i de første linier af scriptet.
Jeg har desværre ikke så god tid så jeg har tid til at hjælpe dig med at sætte det op på dine sider, hvis vi kun snakker points.

Synes godt om

kjeldsen Nybegynder

27. november 1999 - 15:26 #8

S-> Fint nok, det er da ren besked, jeg finder nok ud af det på en eller anden måde. Tak for hjælpen.

Synes godt om

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.

Følg dette spørgsmål

Opret Preview

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.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS

16:11

Dynamics-kæmpen Cepheo leverer røde tal i første regnskab som selvstændigt selskab

14:58

Store sager fra BMW i5: Alt er bare perfekt afstemt her

14:30

Nørgaard: Derfor bruger fattigrøvene AI meget mere end de rige svin

05/07

IBM-direktør efter blodrødt regnskab: “Vi er godt på vej ud af det stormvejr, som ramte os i 2023”

05/07

Kom i problemer efter ransomware-angreb: Nu køber rigmand Christian Stadil IT-Hotellets bunker

05/07

Stiftere overvejer at gøre Flatpay til en bank – krav om compliance er en stopklods

05/07

Rejsekort reducerer kraftigt den tid, som selskabet vil beholde dine lokationsdata i: Vil nu slette dem efter få måneder

05/07

Hackerangreb på OpenAI: Selskabets designs af AI-teknologi stjålet

05/07

Efter skatte-dom: IBM Danmark sætter 163 millioner kroner til side til ekstra skatte-regning i Danmark

05/07

KMD ændrer i sit ikoniske logo efter 17 år

05/07

Klar tale til Tesla og SAP: Snart skal du tale med dit ERP-system

Vis flere artikler

IT-JOB

Netcompany A/S

Test Specialist

Devoteam A/S

Ambitiøs Business Director til vækstrejse i Sourcing & Vendor Management-teamet

Udviklings- og Forenklingsstyrelsen

Data Engineers til bekæmpelse af skatteunddragelse

Region Midtjylland

Struktureret it-specialist, der vil gøre en forskel i Digitalisering og It i Region Midtjylland

Udviklings- og Forenklingsstyrelsen

Kontorchef til kontoret Forskud og Bolig i underdirektørområdet Person

Vis flere jobs

Seneste spørgsmål Seneste aktivitet

I dag 12:56	Forskellige billeder til forskellige skærme ? Af snedker1 i Mac
I dag 11:56	Om brug af funktionen sumprodukt Af Erik R i Excel
I går 22:41	Hjælp til at skrive opgave Af Needhelp i Småopgaver
I går 14:04	Pixeline cd’er til PC Af Mathilde i Windows
I går 01:14	Windows 10 - IIS 10 Af bsn i Windows