wurschtbrot
Geocacher
Hallo.
Einige Autonavis, unter anderem das RNS 510 von VW und soviel ich weiß auch die von SEAT und SKODA, erwarten Wegpunkte als VCF-Datei.
Dazu gibt es das Makro "seat.gsk", das ich leicht modifiziert habe:
Die Übergabe einer Tour auf eine SD-Karte funktioniert auch nahezu perfekt -
ABER:
In Zeile 61 steht
Hier wird übergeben, dass am Display des Navis "GC-Code - Wegpunktname" steht.
PROBLEM:
Sobald im Wegpunkt Anführungszeichen enthalten sind (z.B. SuperTrail #1 "Am Berg"), wird die Übergabe des Wegpunktes pausiert und kann übersprungen werden.
FRAGE:
Wie und wo kann ich dem Makro sagen, dass diese Anführungszeichen in einem Wegpunktnamen trotzdem übergeben oder von mir aus auch automatisch gelöscht werden können?
Danke für euren Input!
wurschtbrot
P.S.: Soll ich das fertige Makro wenn es mal rund läuft veröffentlichen? Hab da keine Erfahrung damit...
Einige Autonavis, unter anderem das RNS 510 von VW und soviel ich weiß auch die von SEAT und SKODA, erwarten Wegpunkte als VCF-Datei.
Dazu gibt es das Makro "seat.gsk", das ich leicht modifiziert habe:
Code:
#*******************************************
# MacVersion = 1.0
# MacDescription = Generate VW vcf
# MacAuthor = wurschtbrot
# MacFileName = rns510.gsk
# MacUrl =
#*******************************************
#Debug Status=on
$vcard="BEGIN:VCARD\nVERSION:3.0\nCATEGORIES:VIP\nX-VIPCategory:Misc\nADR;ENCODING=QUOTED-PRINTABLE:;;;;;;\nX-NAVADDR:;;;;;;;;;\nGEO:!lat!;!long!\nX-Flag:\nREV:20111216T144548z\nFN;ENCODING=QUOTED-PRINTABLE:!name!\nUID:AddresBookPersistentProvider3\nEND:VCARD\n"
# get the file name to save folder from saved settings if file exists
If FileExists($_Install + "\Macros\NavMan.dat")
Set $File = GetFile($_Install + "\Macros\NavMan.dat")
# Just in case file permission error or something test for error
IF Left($File,7) = "*Error*"
Pause Msg="$File"
Cancel
EndIf
else
Set $File = " "
EndIf
# get the file name to put the CSV file out to.
$Result = 2
While $Result = 2
Input Msg="Enter the file name to generate" Default=$File VarName=$File Browse="File"
If FileExists($File)
Choose msg="File already exists. Overwrite?" opt1=Yes opt2=No
If $Result = 1
FileErase File=$file
EndIf
Else
$Result = 1
EndIf
EndWhile
# Save the file name so don't have to key if same next time
Set $error = PutFile($_Install + "\Macros\rns510.dat",$File)
# Just in case file permission error or something test for error
IF Left($Error,7) = "*Error*"
Pause Msg="$Error"
Cancel
EndIf
Set $ThisRecord = 0
Set $NumberFound = 0
Set $NumberPics = 0
Goto Position=Top
# now loop through the current subset to generate the csv file
While .not. $_EOL
# set up totals to show status to user
Set $ThisRecord = $ThisRecord + 1
Set $status = "Now processing: " + "$ThisRecord" + " of " + "$_Count"
ShowStatus msg="$status"
$text=RegExReplace("!lat!",$vcard,$d_Latitude)
$text=RegExReplace("!long!",$text,$d_Longitude)
$text=RegExReplace("!name!",$text,$d_code + " - " + $d_name)
# correct linebreaks
$text = Replace("\n",chr(13)+chr(10),$text)
$Data = PutFile($d_code + " - " + $d_name+".vcf",$text)
# Just in case file permission error or something test for error
IF Left($data,7) = "*Error*"
Pause Msg=$result
Cancel
EndIf
Goto Position=Next
EndWhile
GoTo Position=Top
Die Übergabe einer Tour auf eine SD-Karte funktioniert auch nahezu perfekt -
ABER:
In Zeile 61 steht
Code:
$Data = PutFile($d_code + " - " + $d_name+".vcf",$text)
PROBLEM:
Sobald im Wegpunkt Anführungszeichen enthalten sind (z.B. SuperTrail #1 "Am Berg"), wird die Übergabe des Wegpunktes pausiert und kann übersprungen werden.
FRAGE:
Wie und wo kann ich dem Makro sagen, dass diese Anführungszeichen in einem Wegpunktnamen trotzdem übergeben oder von mir aus auch automatisch gelöscht werden können?
Danke für euren Input!
wurschtbrot
P.S.: Soll ich das fertige Makro wenn es mal rund läuft veröffentlichen? Hab da keine Erfahrung damit...