I am having problems with this. This is my code:

<%
'***Write The Corresponding .M3U File for the .MP3------------------------
dim song
song=rsArtistSongs.Fields.Item("song_url".Value
song=Replace(song,".mp3",".m3u"

Set objFSO = Server.CreateObject("Scripting.FileSystemObject"
dim objTS
Set objTS = objFSO.CreateTextFile("www.schiphop.com/artist_songs/"&song,2,true)
objTS.WriteLine("www.schiphop.com/artist_songs/"&rsArtistSongs.Fields.Item("song_url".Value)
objTS.Close
Set objTS = Nothing
Set objFSO = Nothing
%>


This is the error messag i am getting:

Microsoft VBScript runtime error '800a0034'

Bad file name or number

/new_artist/new_artist_upload_song_verify.asp, line 67


any help appreciated. thanks

John Auzheal Clement
(www.digitm.com)