email in veld

[spokkem]

Hallo

ik heb een datbase gemaakt in access 2007
ik heb een veld aangemaakt met de keuze voor hyperlink
ik kan in het veld een email adress neerzetten deze onderstreept hij ook mooi.
maar als ik daar op druk gaat hij naar een webpagina.
ik heb gezocht en gelezen dat er mailto: voor moet staan om hem naar een emaildres te sturen.
ik probeer nu deze mailto: er standaard voor te krijgen alleen het programma roept dat je geen invoermasker hier mag invullen.
ik heb toch in het invoermasker "mailto:" gezet dit pakt hij wel maar ik moet dan eerste met de pijltjes toets voorbij mailto: gaat staan en dan typen.
is dit ook mogelijk dat de cursor direct achter mailto gaat staan???

vr gr spokkem

 

[Greenery80]

SelStart

Het is mogelijk dat de cursor direct achter mailto gaat staan.

Met de volgende VBA code:

Me!VeldMailTo.SelStart = Me!VeldMailTo.SelLength

VeldMailTo heb ik gebruikt als voorbeeld, dit is dus de naam van het veld.

SelStart stelt in waar de cursor moet staan.
En SelLength is het aantal karakters geselecteerd in een tekstvak.
De cursor staat dus altijd aan de rechterkant.

Ik hoop dat je hier verder mee komt!

 

[spokkem]

bedankt voor de snelle reactie

misschien een domme vraag maar waar zet ik dit neer.
moet ik dit doen bij gebeurtenis en zo ja welke
of moet dit in het veld zelf??

vr gr spokkem

 

[Greenery80]

SelStart waar?

Het is absoluut geen domme vraag.

In de help van VBA staat het volgende:

Notities
De eigenschap SelStart is altijd geldig, zelfs wanneer het besturingselement niet de focus heeft. Als u SelStart op een waarde instelt die lager is dan nul, heeft dit een fout tot gevolg. Als u SelStart probeert in te stellen op een waarde die hoger is dan het aantal tekens dat beschikbaar is in een besturingselement, resulteert dit in een waarde die gelijk is aan het aantal tekens in het besturingselement.


Kortom je kunt volgens mij een gebeurtenis aanmaken in het formulier, dan "Bij openen" dat er als volgt uitziet:

Private Sub Form_Open(Cancel As Integer)

    Me!VeldMailTo.SelStart = Me!VeldMailTo.SelLength

End Sub

Als dit niet werkt kun je ook Me!VeldMailTo.SelLength vervangen door een hoog getal.
Nogmaals -> er staat in de help:
Als u SelStart probeert in te stellen op een waarde die hoger is dan het aantal tekens dat beschikbaar is in een besturingselement, resulteert dit in een waarde die gelijk is aan het aantal tekens in het besturingselement.

Veel suc6!

 

[spokkem]

Greenery80

bedankt het werkt

vr gr spokkem:thumb::thumb: