Får felmedelande;
____
Microsoft VBScript runtime error '800a000d'
Type mismatch: 'wfile.Write'
/intranet/fax/skapafaxnummer.asp, line 14
____

Vad kan vara fel? Fil skapas med 17 poster av 400 och sen kommer felmedelande...

trevlig helg
//tyrone

<%
	Set Conn = Server.CreateObject("ADODB.Connection")
	Set RS = Server.CreateObject("ADODB.recordset")
	Conn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/database/kund.mdb")
		
  set fs = Server.createobject("scripting.FileSystemObject")
  set wfile = fs.CreateTextFile("q:\tyrone\allafaxnummer.txt",true)
  
	Set RS=Conn.Execute("SELECT * FROM kunder")
	If RS.EOF then
	Response.Write("<b>Hittar inte databas eller så är något fel</b>")
	Else Do until RS.EOF	

  wfile.write (RS("RiktnrFax")) &_
  wfile.write (RS("Telefax")) &_ 
  wfile.write (" [[BESKRIVNING=") &_
  wfile.write (RS("Kundnamn")) &_
  wfile.write ("]]") &_
  wfile.write (vbCrLf) &_

	RS.Movenext
	Loop
	End If  
  
  wfile.close
  set wfile = nothing
  set fs = nothing
  
	RS.Close
	Set RS = Nothing
	Conn.Close
	Set Conn = Nothing  

	response.write("Faxfilen är skapad (txt)")
%> 

Troligtvis beror det på null-värden i databasen, testa såhär:

  wfile.write (RS("RiktnrFax") & "") &_
  wfile.write (RS("Telefax") & "") &_ 
  wfile.write (" [[BESKRIVNING=") &_
  wfile.write (RS("Kundnamn") & "") &_
  wfile.write ("]]") &_
  wfile.write (vbCrLf) &_

Kalas - tackar så mycket och önskar trevlig helg!

Jag antar att du har tänkt fel eftersom det inte ska vara någon &_ alls...

wfile.write RS("RiktnrFax")
wfile.write RS("Telefax")
wfile.write " [[BESKRIVNING="
wfile.write RS("Kundnamn")
wfile.write "]]"
wfile.write vbCrLf