✔ Inahlte it Replace austuaschen und in txt schreiben.

[ronaldo84]

Inhalte mit Replace ersetzen und in txt schreiben

Hallo
habe eine Datenbank, deren Inhalt ich in eine txt umwandeln möchte. Mit SQL Befehlen zum erstellen, dropen und fühlen der Tabelle. Das klappt auch. Aber wenn ich in die Access Tabellen einen Link einfüge kommt an den ende ein # das er anscheinden automatisch einfügt. Weiß nicht wo es herkommt wollte es nun über die Replace Funktion rausfiltern.
So wie hier

 Do While Not .EOF
tmpPR = !preis
tmpPreis = Replace(tmpPR, ",", ".")
tmpna = !Name
tmpname = Replace(tmpna, "'", "-")

Habe also dies bedien Zeilen mitzugefügt

tmpli = !link
tmplink = Replace(tmpli, "#","")

Das ist ja auch richtig. Aber mein Problem ist nun das im gegensatz zu Preis und Name, Link nicht immer einen Wert enthält. Und wenn das Feld leer ist passiert eine Division durch Null und Fehler.
Da habe ich mir nun gedacht: "Mensch du bist doch ein cleverer Bursche " und wollte es einfach mit if machen.

 Do While Not .EOF
if(!link <>"") Then
tmpli = !link
tmplink = Replace(tmpli, "#","") 
else
tmpPR = !preis
tmpPreis = Replace(tmpPR, ",", ".")

Anscheinend war ich doch nicht so clever . Er briingt zwar keien Fehlermeldung und erstellt die txt auch. Aber leider nun ohne die vorhanden Inhalte von Link. Er macht dann für jedes "Linkfeld" einfach "" in die txt, auch wenn das Feld einen Inhalt hat.
Kann mir jmd. weiterhelfen und Link einfach einen Standardwert mag ich auch nicht.

Danke

 

[Alex F.]

Re: Inhalte mit Replace ersetzen und in txt schreiben

Vielleicht liegt es daran das !link nicht "" sondern Null ist

mach es so

  If not ( IsNull(!link)  )Then
              replace blablabla
   end if

Gruss bb

 

[ronaldo84]

Danke das wars.