Taal instelling

Status
Niet open voor verdere reacties.

kristofvdp

Gebruiker
Lid geworden
29 dec 2005
Berichten
54
Wanneer de klant nederlands praat wordt zijn rapport in het nederlands afgedrukt, wanneer hij frans praat in het frans. Maar hoe stel ik in dat de datum die verwerkt zit in het rapport ook in het frans staat?

bv: NU: vrijdag 27 mei 2006 --> moet zijn: vendredi 27 Mai 2006.

Hoe kan je dit instellen voor één specifiek rapport?

Wie heeft dit al opgelost of meegemaakt?

Thanks!
 
Heeft niemand een idee?

Of weet iemand een website waar ik het eventueel kan vinden?
 
Je kunt ook zelf een tabel maken met een functie die een stringwaarde retourneert. De tabel bevat de velden soort(1=dag en 2 = maand), nummer,nedrlands, frans.

In een module de volgende functie
Public Enum talens
nederlands = 1
frans = 2
End Enum

Public Function VertalingFR(taal As talens, dtdatumInv As Date) As String
Dim rs As DAO.Recordset
Dim intdagvandeweek As Integer
Dim strDagVandeweek As String
Dim intMaand As Integer
Dim strMaand As String
Dim dtDatum As Date
dtDatum = Format(dtdatumInv, "mm-dd-yyyy")
Set rs = CurrentDb.OpenRecordset("vertalingen", dbOpenDynaset)
intdagvandeweek = Weekday(dtDatum, vbMonday)
rs.FindFirst "[Nummer] = " & intdagvandeweek & " AND [Soort] = 1"
strDagVandeweek = IIf(taal = 1, rs!nederlands, rs!frans)
intMaand = Month(dtDatum)
rs.FindFirst "[Nummer] = " & intMaand & " AND [soort] = 2"
strMaand = IIf(taal = 1, rs!nederlands, rs!frans)
VertalingFR = strDagVandeweek & " " & Day(dtDatum) & " " & strMaand & " " & Year(dtDatum)
End Function

ps je kunt er niet mee rekenen.

GG
 
Dank je wel voor een oplossing. Ik had ondertussen ook al zoiets gebouwd met aparte tabellen voor maand en dag (in de verschillende talen). Kheb het zodanig gebouwd dat ik er toch nog mee kan rekenen later.
Het is dus "gelukt" maar met een zeer grote omweg.

Ik had ondertussen ook al ergens gezien dat je met een vba code de taalinstellingen van de win.ini file tijdelijk kunt beïnvloeden, maar dat lijkt me toch iets te gevaarlijk.

Bedankt voor de interactie ;)

ciao
 
Status
Niet open voor verdere reacties.
Terug
Bovenaan Onderaan