kun domænet ikke subdomænet

forsøgte med

Function FindDomain(Url) 
If Url > "" Then 
    FindEnd = False 
    i = 0 
    EndPos = 0 
    Do 
        i = i + 1 
        If FindEnd And Mid(Url,i,1) = "/" Then 
            EndPos = i 
        End If 
        If Not FindEnd And Mid(Url,i,2) = "//" Then 
            FindEnd = True 
            i = i + 1 
        End If 
    Loop Until i >= Len(Url)-1 Or EndPos > 0 
 
    If EndPos > 0 Then 
        FindDomain = Left(Url,EndPos-1) 
    Else 
        FindDomain = Url 
    End If 
End If 
End Function

men den fjerner ikke subdomaine

nu ved jeg ikke om instr findes i asp
men i vb ville den se sådan ud

Public Function FindURL(url)
FindURL = Left(url, InStr(InStr(1, url, "//") + 2, url, "/") - 1)
End Function

instr findes men jeg får fejlen

Invalid procedure call or argument: 'Left'

Public Function FindURL(url)
    Start = InStr(1, url, "//") + 2' antal tegn til og med //
    Slut = InStr(Start, url, "/") - 1 ' antal tegn til og ikke med første / enkeltstående
    FindURL = Left(url, Slut)
End Function


prøv at se om både start og slut får værdier

Hvis det kun er domænet du vil have ville dette vel være nok?

Request.ServerVariables("HTTP_HOST")

jansangill jo det kunne man men hvordan vil du gøre det når adresserne står i en database ?

tester = "http://kjhgfd.ollo.com/"

Public Function FindURL(url)
    Start = InStr(1, url, "//") + 2' antal tegn til og med //
    Slut = InStr(Start, url, "/") - 1 ' antal tegn til og ikke med første / enkeltstående
    FindURL = Left(url, Slut)
End Function

response.write FindURL(tester)

giver http://kjhgfd.ollo.com og jeg vil have ollo.com

For lige at gøre det mere latterligt har jeg faktisk domæner som denne også

search.hp.netscape.com el. netgog.com.tw

Jeg synes den mest åbenlyse måtte være at hvis du har det fra en db, så gem både domænet, og hele url'en i databasen. Altså en felt til domæne og en til url.

Ellers er der jo en masse af tage hensyn til som jeg ikke lige vil bruge min tid på:>

jansangill >> Nu er der jo ingen der tvinger dig til at bruge noget tid overhovedet.

Urlerne kommer fra et 3parts program og jeg har ingen indflydelse på det, men glem det nu bare for din tid kan sikkert bruges bedere andet sted.

gameover så

Hvis du kun vil have domænet, er det jo meget svært, fordi en domænet kan jo både være

test.test.dk

og test.dk

Så hvordan vil man vide hvornår man skal cutte og fjerne sagerne, ifh til de forskellige url's.

Men ja, held og lykke med det:>

Synes umiddelbart det virkede temmelig simpelt - har lavet det i en funktion, og forklaret hvad jeg gør.

<%
Function FjernAltAndetEndDomaene(domaene)

    strTemp = domaene ' Definerer forst domænet
    If InStr(strTemp,"/") > 0 Then ' Undersøger om der er andet end et domæne navn
        strTemp = Left(strTemp,InStr(strTemp,"/")-1) ' Det er der - fjern det!
    End If

    strTemp = Replace(strTemp,"www.","") ' Fjerner www. - fjern det evt.
    arrTemp = Split(strTemp,".") ' Skaber array

    FjernAltAndetEndDomaene = arrTemp(UBound(arrTemp)-1) & "." & arrTemp(UBound(arrTemp))
   
End Function

Response.Write FjernAltAndetEndDomaene("test.john.google.com")
%>

madeindk: Prøv at køre bbc.co.uk igennem den der og se hvad du får ud. Næppe det rigtige ;)

Problemet med sådan en opgave er at det ikke er helt ligetil at definere hvor domænet slutter, og subdomænet begynder. Herhjemme er vi vant til at den "del" der kommer umiddelbart før .dk er en del af selve domænet, mens alt før er en del af subdomænet - og det er også rigtigt for mange TLDs.

Britiske adresser er et godt eksempel - eks. er BBC's hjemmesidde bbc.co.uk, og det er alt sammen en del af domænet, fordi det er en "third-level" registrering (second-level er ikke mulige i .uk). Samtidigt er der .sch.uk, reserveret til skoler, hvor man skal helt ud til *fjerde* niveau før du har hele domænet med - tredje niveau angiver hvilket distrikt skolen hører under.

Lige netop den kan du måske godt acceptere, men for at det ikke skal være løgn, så er der endda enkelte second-level domæner i .uk, som blev dannet inden de gik over til deres nuværende third-level-system. Der er også andre steder hvor man har variable niveauer, eks. Japan - Nintendo har eks. nintendo.co.jp, mens Nico Nico Douga, en populær japansk videotjeneste, har nicovideo.jp.

Den eneste egentlige løsning er derfor at man indsamler de fornødne oplysninger om hvilke niveauer registreringer foregår på for hvert enkelt TLD, og benytter disse til at afgøre hvor mange elementer der skal bruges til et domæne der slutter på det man nu har fået ind - og man skal så være forberedt på at holde det ved lige, så du ikke pludselig får forkerte resultater den dag der bliver indført et nyt TLD eller Storbritannien beslutter sig for at lave et nyt second-level domæne.

Argh ja, ok - du har ret pidgeot - det havde jeg ikke lige tænkt på :-)

Problemet er at vi ikke på forhånd kender alle TLDer men er det mon muligt at gøre det med et komponent og i så fald hvilket ?