Angående udskrivning til fil

Jeg vil skrive til en fil, jeg bruger metoderne
FileOpen, write og FileClose,
men det vil ikke noget, for det første vil write ikke modtage en konkateneret streng, og derefter kommer der semikolonerne med som definerer strengen, og et komma for hver gang man skriver, jeg har hårdt brug for en åbenbaring, koden ses nedenfor

FileOpen(FilNr, mapsFil, OpenAccess.Write)
'Write(FilNr, "rd ")
'Write(FilNr, Chr(34))
'Write(FilNr, mohaaPath)
'Write(FilNr, "main\PK3*.*")
'Write(FilNr, Chr(34))
'Write(FilNr, vbCrLf)
Write(FilNr, "rd " & Chr(34) & mohaaPath & "main\PK3*.*" & Chr(34) & vbCrLf)

De korte linjer er fordi at den ikke kunne modtage en konkateneret streng, og den langevar sådan som jeg ville have den, men det ville den ikke godtage, men da jeg prøvede at dele det op, til de små sætninger virkede det,
resultatet skulle gerne se således ud
rd "d:\spil\mohaa2\main\pk3\"

men det ser således ud
"rd ",","d:\spil\mohaa2\","main\PK3*.*",","
",

NEED help