[VBA] Access 2000/VBA taalprobleem?

Pagina: 1
Acties:

  • Maasluip
  • Registratie: April 2002
  • Laatst online: 19:25

Maasluip

Kabbelend watertje

Topicstarter
Ik heb een mooie applicatie in Access 2000 en VBA gemaakt die bij mij perfect werkt maar bij onze Franse collega's niet. Ik ben bang dat de localized versie mij parten speelt maar dat weet ik niet zeker. Ik heb een Engelse XP/Office, de Fransen hebben een Franse XP/Office.

In mijn VB functie doe ik dit (met excuses voor de layoutverneuking):
Visual Basic .NET:
1
2
3
4
5
6
7
8
9
10
11
sQuery = "INSERT INTO BCR_FR_Business ( BD, BT, PROD, AG, OGM, RP_TOTAL, RP_PARTS, Periode )"
sQuery = sQuery & " SELECT BDBT.BD, BDBT.BT, BDBT.PROD, [PSG_Office by District].AG,"
sQuery = sQuery & " Sum([BCR_CntUmVisits])+Sum([BCR_CntSmVisits]) AS OGM,"
sQuery = sQuery & " Sum([BCR_CntTotalBroken])+Sum([BCR_CntOpenVisit]) AS RP_TOTAL,"
sQuery = sQuery & " Sum([BCR_CntBrokenPart])+Sum([BCR_CntVisitOpenEO]) AS RP_PARTS,"
sQuery = sQuery & sPeriod & " AS Periode"
sQuery = sQuery & " FROM [PSG_Office by District], [001 All Engineers] INNER JOIN BDBT ON [001 All Engineers].Produit_Opale = BDBT.PROD"
sQuery = sQuery & " WHERE Left([Affect_Tsc_Activite], 3) = Left([District], 3)"
sQuery = sQuery & " GROUP BY BDBT.BD, BDBT.BT, BDBT.PROD, [PSG_Office by District].AG;"

Call db.Execute(sQuery)

En ik krijg een runtime error 3061: Too few parameters op de laatste regel. Eerdere db.Execute oproepen (met andere queries) gaan wel goed.
Ik mag toch hopen dat een Franse Access met Engelse SQL statements werkt, maar ik ben een beetje bang dat dat Left([Affect_Tsc_Activite], 3) niet werkt in een Franse Access, kan dat kloppen? Is er iemand die dat voor mij uit kan proberen? Ik heb zelf namelijk geen toegang tot een andere taalversie van XP of Office.
Als left... niet werkt, wat moet dat dan zijn? gauche...?

[ Voor 6% gewijzigd door Maasluip op 26-11-2004 11:57 ]

Signatures zijn voor boomers.


  • Boss
  • Registratie: September 1999
  • Laatst online: 23:37

Boss

+1 Overgewaardeerd

offtopic:
In plaats van iedere regel sQuery = sQuery & " blaat" kan je ook regels aan elkaar koppelen met een _ op het einde, dus:

code:
1
2
3
sQuery = "blaat regel 1 " & _
  "blaat regel 2 " & _
  "einde blaat"


SQL zou in alle talen hetzelfde moeten zijn, maar met die fransen weet je het nooit!

Wat je zou kunnen proberen is de , in functies vervangen door ;. Misschien lost dat het probleem op.

[ Voor 20% gewijzigd door Boss op 26-11-2004 14:50 ]

The process of preparing programs for a digital computer is especially attractive, not only because it can be economically and scientifically rewarding, but also because it is an aesthetic experience much like composing poetry or music.


  • Maasluip
  • Registratie: April 2002
  • Laatst online: 19:25

Maasluip

Kabbelend watertje

Topicstarter
Boss schreef op vrijdag 26 november 2004 @ 14:49:
offtopic:
In plaats van iedere regel sQuery = sQuery & " blaat" kan je ook regels aan elkaar koppelen met een _ op het einde, dus:
Mijn code is altijd highly fluctuating, zo is het wel makkelijk om even snel een regeltje weg te commentarieren
[/uitvluchtmode off]
Wat je zou kunnen proberen is de , in functies vervangen door ;. Misschien lost dat het probleem op.
Dat is een goede tip. En als het goed is gaat XP remote assistance ook werken dus werk ik volgende week even in Parijs (virtueel).

Signatures zijn voor boomers.