<?xml version="1.0" encoding="UTF-8"?><rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
		>
<channel>
	<title>Kommentare zu: VB.NET Textdatei mit ANSI formatierung erstellen</title>
	<atom:link href="http://www.truefuture.de/wordpress/?feed=rss2&#038;p=145" rel="self" type="application/rss+xml" />
	<link>http://www.truefuture.de/wordpress/?p=145</link>
	<description>only once you will see it</description>
	<lastBuildDate>Fri, 03 Sep 2010 20:20:16 +0000</lastBuildDate>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
	<generator>http://wordpress.org/?v=3.0.1</generator>
	<item>
		<title>Von: Tobias</title>
		<link>http://www.truefuture.de/wordpress/?p=145&#038;cpage=1#comment-29</link>
		<dc:creator>Tobias</dc:creator>
		<pubDate>Tue, 05 Jan 2010 23:02:14 +0000</pubDate>
		<guid isPermaLink="false">http://www.truefuture.de/wordpress/?p=145#comment-29</guid>
		<description>Das Problem mit &quot;Super-Programmen&quot; kenn ich!

Für VBS muss man für die Ausgabe von Textdateien im ANSI-Format wie folgt vorgehen:

Dim oFS, oFile
Set oFS = CreateObject(&quot;Scripting.FileSystemObject&quot;)
&#039; Der zweite Parameter legt fest, dass es in ANSI gespeichert wird (False = ANSI / True = ASCII)
Set oFile = oFS.CreateTextFile(dateiName, False)

Wichtig ist dass bei .CreateTextFile() der zweite Parameter auf False steht. Einen Haken hat die Sache jedoch.. Man kann damit nicht mehr bereits existente Dateien überschreiben und muss diese zuerst vorher noch löschen. 

Grüße

Tobias</description>
		<content:encoded><![CDATA[<p>Das Problem mit &#8220;Super-Programmen&#8221; kenn ich!</p>
<p>Für VBS muss man für die Ausgabe von Textdateien im ANSI-Format wie folgt vorgehen:</p>
<p>Dim oFS, oFile<br />
Set oFS = CreateObject(&#8220;Scripting.FileSystemObject&#8221;)<br />
&#8216; Der zweite Parameter legt fest, dass es in ANSI gespeichert wird (False = ANSI / True = ASCII)<br />
Set oFile = oFS.CreateTextFile(dateiName, False)</p>
<p>Wichtig ist dass bei .CreateTextFile() der zweite Parameter auf False steht. Einen Haken hat die Sache jedoch.. Man kann damit nicht mehr bereits existente Dateien überschreiben und muss diese zuerst vorher noch löschen. </p>
<p>Grüße</p>
<p>Tobias</p>
]]></content:encoded>
	</item>
</channel>
</rss>
