Avatar billede ronniwenzell Nybegynder
06. september 2004 - 15:21 Der er 14 kommentarer og
1 løsning

Søg Google fra egen server, men æ og ø og å kommer ikke med

Hej.

Jeg har lavet en side til min bror, hvor hans arbejds-ting er samlet http://www.eurobooking.com/intranet/index.asp - men søgefeltet til google medtager ikke æøå ÆØÅ ved søgning. Jeg har ellers - så godt som - taget google's egen kode fra http://www.google.dk/intl/da/searchcode.html

Kan nogle hjælpe mig med dette?
Avatar billede thomashove Nybegynder
06. september 2004 - 16:32 #1
du skal angive det rigtige charset.

<head><meta http-equiv="content-type" content="text/html; charset=UTF-8"></head>
Avatar billede thomashove Nybegynder
06. september 2004 - 16:34 #2
dit lille "ø" i google Søgning vil så ryge sig en tur med mindre du skriver

<INPUT type="submit" name="btnG" VALUE="Google S&oslash;gning">
Avatar billede ronniwenzell Nybegynder
06. september 2004 - 22:56 #3
det virker, men nu er der dukket et andet problem op:

Via ASP hentes der indhold fra intranet.txt-filen og outputtet vises i det grå felt i venstre hjørne, men nu er æøå blevet til kinesiske tegn??
Avatar billede ronniwenzell Nybegynder
06. september 2004 - 22:58 #4
Grunden til denne APS-kode er, at min bror skal kunne skrive hvad han vil i txt-filen, som så derefter vises på siden... Hvordan løses det?
Avatar billede ronniwenzell Nybegynder
06. september 2004 - 23:05 #5
ASP-scriptet ser sådan ud:

        <div id="aktuelt">
            <p><%
                        Dim fso, f, filespec, f2, filespec2
                        Set fso = CreateObject("Scripting.FileSystemObject")
                        filespec = Server.Mappath("intranet.txt")
                        Set f = fso.OpenTextFile(filespec,1)

                        ' Læs linie for linie indtil slutningen af filen
                        Do While not f.AtEndOfStream
                          Response.write f.ReadLine & "<br>"
                        Loop

                        f.Close
                    %><br></p>
        </div>
        <div id="billede">
...etc...
Avatar billede thomashove Nybegynder
07. september 2004 - 09:11 #6
i PHP har man funktionen htmlentities() der kan klare den slags små problemer ;-)

Tjekker lige hvordan det fikses i asp
Avatar billede ldanielsen Nybegynder
07. september 2004 - 09:19 #7
Med lidt testeri fandt jeg ud af dette:

<P><!-- Search Google -->
<center>
<FORM method=GET action="http://www.google.dk/search">
<TABLE bgcolor="#FFFFFF"><tr><td>
<A HREF="http://www.google.dk/">
<IMG SRC="http://www.google.dk/logos/Logo_40wht.gif" border="0" ALT="Google" align="absmiddle"></A>
<INPUT TYPE=text name=q size=31 maxlength=255 value="">
<INPUT TYPE=hidden name=hl value="da">
<INPUT TYPE=hidden name=ie value="UTF-7">
<INPUT type=submit name=btnG VALUE="Google Search">
</td></tr></TABLE>
</FORM>
</center>
<!-- Search Google -->
</P>
Avatar billede ldanielsen Nybegynder
07. september 2004 - 09:21 #8
Jeg har skiftet til dansk, ved at skrive da i stedet for en i
<INPUT TYPE=hidden name=hl value="da">

men det der gør forskellen er at jeg har tilføjet:
<INPUT TYPE=hidden name=ie value="UTF-7">
Avatar billede thomashove Nybegynder
07. september 2004 - 09:47 #9
ellers kan du kører dine sætninger igennem denne funktion

function MyConverter(str)
    str = Replace(str, "æ", "&aelig;")
    str = Replace(str, "Æ", "&AElig;")
    str = Replace(str, "ø", "&oslash;")
    str = Replace(str, "Ø", "&Oslash;")
    str = Replace(str, "å", "&aring;")
    str = Replace(str, "Å", "&Aring;")
    MyConverter = str
End function
Avatar billede thomashove Nybegynder
07. september 2004 - 09:48 #10
et eksempel:

<%
 
  function MyConverter(str)
    str = Replace(str, "æ", "&aelig;")
    str = Replace(str, "Æ", "&AElig;")
    str = Replace(str, "ø", "&oslash;")
    str = Replace(str, "Ø", "&Oslash;")
    str = Replace(str, "å", "&aring;")
    str = Replace(str, "Å", "&Aring;")
    MyConverter = str
  End function

  Dim x
  x = "æøå ÆØÅ"

 
  MyConverter(x)
  response.write(x)
%>
Avatar billede ronniwenzell Nybegynder
07. september 2004 - 14:53 #11
Idanielsen> Jeg forsøgte din forslag med at ændre til dansk samt tilføje
<INPUT TYPE=hidden name=ie value="UTF-7">, men siden erstatter stadig ÆØÅæøå med kinesiske bogstaver :-/ Men mangler jeg noget, eller har du en anden idé er jeg klart frisk på at prøve det.

thomashove> jeg forstår ideen i at få en function til at ændre alle ÆØÅæøå til de rigtige 'koder', men jeg kunne ikke rigtig få asp-scriptet til at virke på siden. Måske gjorde jeg noget forkert?
Jeg forsøgte først at indsætte ASP'en FØR det oprindelige ASP-hent-txt-script og senere EFTER, men kunne ikke få function'en til at løbe igennem den tekst der blev hentet ind?
Skal de to ASP'er sammenskrives?
Avatar billede thomashove Nybegynder
07. september 2004 - 15:05 #12
gør sådan her:


<div id="aktuelt">
            <p><%
                        function MyConverter(str)
                        str = Replace(str, "æ", "&aelig;")
                        str = Replace(str, "Æ", "&AElig;")
                        str = Replace(str, "ø", "&oslash;")
                        str = Replace(str, "Ø", "&Oslash;")
                        str = Replace(str, "å", "&aring;")
                        str = Replace(str, "Å", "&Aring;")
                      MyConverter = str
                      End function
                       
                        Dim fso, f, filespec, f2, filespec2
                        Set fso = CreateObject("Scripting.FileSystemObject")
                        filespec = Server.Mappath("intranet.txt")
                        Set f = fso.OpenTextFile(filespec,1)

                        ' Læs linie for linie indtil slutningen af filen
                        Do While not f.AtEndOfStream
                          Response.write MyConverter(f.ReadLine) & "<br>"
                        Loop

                        f.Close
                    %><br></p>
        </div>
        <div id="billede">
Avatar billede thomashove Nybegynder
07. september 2004 - 15:06 #13
du sætter bare funktionen ind et eller andet sted i toppen af dit script

dernæst bruger du den ved at sige

Response.write MyConverter(f.ReadLine) & "<br>"

der hvor du skriver hver linie i filen
Avatar billede ronniwenzell Nybegynder
07. september 2004 - 16:20 #14
thomashove> det virker! tak og værs'go!
idenielsen> kunne ikke få det til at virke, desværre.
Avatar billede thomashove Nybegynder
07. september 2004 - 16:34 #15
takker ;-)
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
IT-kurser om Microsoft 365, sikkerhed, personlig vækst, udvikling, digital markedsføring, grafisk design, SAP og forretningsanalyse.

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