title image


Smiley Re: Probleme mit VBS - ich bin zu doof
Das habe ich Dir angegeben:



*******************************************************



while not i.atendofstream



Ausdruck=mid(i.readline,1)

SuchZF="ÂŽ"

ErsetzenDurch="ä"

Ausdruck = Replace(Ausdruck, SuchZF, ErsetzenDurch)



SuchZF="?" <<<< NUR ZEILE FÜR WEITERE KRITERIEN

ErsetzenDurch="?" <<<< NUR ZEILE FÜR WEITERE KRITERIEN

Ausdruck = Replace(Ausdruck, SuchZF, ErsetzenDurch) <<<< NUR ZEILE FÜR WEITERE KRITERIEN



o.writeline Ausdruck



wend



*******************************************************



Das kommt von Dir zurück:



while not i.atendofstream

o.writeline mid(i.readline,1) <<<<<<<<<<<<<<<< HIER LIEGT DER FEHLER, ZEILE MUSS NATÜRLICH ENTFERNT WERDEN !!



Ausdruck=mid(i.readline,1)

SuchZF="ÂŽ"

ErsetzenDurch="ä"

Ausdruck = Replace(Ausdruck, SuchZF, ErsetzenDurch)



o.writeline Ausdruck



wend






Wer weiß schon, was er nicht weiß...(ich zähle mich auch dazu) Holger

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: