mailto

Det var da underligt ... sidder med det samme problem ... :)

At browseren starter op skyldes, at du har sat feltet til at virke som et hyperlink. Det skal nok være \'tekst\', men hvordan vi kommer videre, så vi kan få vores mailfunktion, det står (forhåbentligvis ikke længe) åbent ... :)

Hjælp os :o)

Rart ikke at være alene

Hvis man bare kunne angive formatet af de indtastede data til at være mailto:....

Måske en inputmakse på formularens felt, men hvordan angiver man den korrekt?...

hvordan ser koden ud?

er du sikker på at linket ser således ud;

mailto:adr@domæne.dk

?

Jeps! Der er et hav af ganske alm. mailadresser i arkivet, og de åbner alle en browser...

Ja altså, dvs. de er ikke angivet med \"mailto\" foran!!

ja - dette er korrekt;

<a href=\"mailto:kim@soze.dk\">min mail</a>

Vil det sige at jeg er nødt til at opdatere alle mailadresser i min db fra

adr@domæne.dk

til
mailto:adr@domæne.dk

Er der ikke en måde at få feltet til at angive en mailadresse på, så indholdet af feltet er den \"rene\" mail-adresse??

bare skriv mailto: i din htmlkode efterfulgt af db-udtrækket...

Der er (desværre) ikke tale om et db udtræk, ej heller html-kode, men om en ren Access-ting...

Fandt selv et muligt svar (endnu ikke testet) http://www.computerbooksonline.com/tips/Access2.asp#115

Ser fint ud ... tester du den \'foldager\' ... ?

Ja, det virker jo fint hvis der i tabellen står:

mailto:adr@domæne.dk

Det vidste jeg sådan set godt. Mit problem er at min tabel er fyldt med

adr@domæne.dk formaterede adresser

Det kunne man vel klare med en opdateringsforespørgsel, men nye adresser skulle gerne tilføjes i det rigtige format, UDEN at man hver gang skal skrive mailto: foran adressen.....
for det får jeg aldrig folk (brugerne) til at forstå ;-)

Hmm, ja jeg kan godt se problemet. Mon ikke en VB-kyndig kunne sætte den mailto: foran ... jeg kan desværre ikke ...

VB-kyndig.....Noget tyder på at jeg må hoste op med nogle flere point...

I kontrollens Click-event skriver du:

\'kontrolnavn\'.HyperlinkAddress = \"mailto:\" & \'kontrolnavn\'.HyperlinkAddress

MVH tjacob

Nej det duer ikke alligevel. Så vil den blot blive ved med at tilføje \"mailto:\".

Ærgeligt :(
... men der må være en løsning :)
Vi kan ikke være de første med det \'problem\' ...

Keep them coming ... :)

Denne kode vil tjekke om der er mailto, og derefter tilføje den, hvis nødvendigt:

    Dim strA As String 
    strA = \'Kontrolnavn\'.Hyperlink.Address
   
    If Not Left(strA, 6) = \"mailto\" Then
        \'Kontrolnavn\'.Hyperlink.Address = \"mailto:\" & strA
    End If

Sådan:

Jeg skulle måske tilføje:
I designtilstand går du ind i kontrollens egenskaber; i Hændelser vælger du [hændelsesprocedure] i VedKlik, og trykker derefter på ...
Her indsætter du koden fra min kommentar 18:03.

MVH tjacob

Hmm, jeg får \'Compile error - Syntax error\' på    strA = \'Kontrolnavn\'.Hyperlink.Address

Måske jeg / vi skal skrive noget andet i stedet for \'Kontrolnavn\' ?

\'KontrolNavn\' er bare noget jeg skrev
-du skal erstatte det med kontrollens rigtige navn!

det er sikkert en tekstbox eller en label (etiketxx)
I Designtilstand højreklikker du på hyperlinket, og vælger egenskaber. Under fanen Andre finder du kontrollens navn.

MVH tjacob

OK ... det være gjort :)

Når jeg så tester, så får jeg desværre en alert der siger:

\'run-time error 7980
Egenskaben Hyperlinkadresse eller Hyperlinkunderadresse er skrivebeskyttet i forbindelse med denne hyperlink\'

P.s. Access 2000 - hvis det gør nogen forskel ...

Prøv at ændre koden til dette (jeg er ikke sikker på det virker :)

Dim strA As String, hypA as HyperLink
    set hypA = \'Kontrolnavn\'.Hyperlink
    strA = hypA.Address
   
    If Not Left(strA, 6) = \"mailto\" Then
        hypA.Address = \"mailto:\" & strA
    End If

    hypA.Follow

Du kan evt. udelade sidste linie

Hvis ikke dette hjælper, så skal du ind og ændre noget med brugertilladelser, så du får ret til at ændre posterne i den tabel, der indeholder E-mail adresserne. (derefter kan du [forhåbentlig] bruge den kode jeg foreslog først).

MVH tjacob

Det lyder lovende (har endnu ikke afprøvet koden).
Jeg har fundet dette mulige svar: http://groups.google.com/groups?hl=da&frame=right&th=e86b6602dc8167d9&seekm=3988dde1.42644682%40news.earthlink.net#link1

Ved kraftig inspiration herfra : http://groups.google.com/groups?hl=da&selm=8m9qhv%247uu%241%40nnrp1.deja.com
har jeg fundet en løsning:


Jeg har på min formular en alm. tekstboks kaldet \"email\"
tekstboksen henter data fra et alm. tekstfelt i min tabel (ikke hyperlink)

Ved hændelsen dobb.klik for dette felt står følgende kode:

**********************

Private Sub email_DblClick(Cancel As Integer)
Dim hplMail As String
    hplMail = \"#MailTo:\" & Me.email & \"#\"
    Application.FollowHyperlink HyperlinkPart(hplMail, acAddress)
End Sub


**********************

Det virker som en drøm!

Grunden til at man skal dobb. klikke for at aktivere mail-programmet er at man ellers ikke kan komme til at redigere adressen.

Tak for hjælpen alle sammen......selv om jeg selv snupper en ordenlig bid af kagen ;-)!

Nu virker det også fint i denne ende - tak for hjælpen og Godt Nytår :)