next »

[Josefine]

Imports Un4seen.Bass
Public Class Form1

    Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing
        Bass.BASS_Stop()
        Bass.BASS_Free()
    End Sub

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        IO.File.WriteAllBytes(My.Computer.FileSystem.SpecialDirectories.Temp + "./test.xm", My.Resources.test)
        Bass.BASS_Init(0, 44100, BASSInit.BASS_DEVICE_DEFAULT)
        Bass.BASS_MusicLoad(My.Computer.FileSystem.SpecialDirectories.Temp + "./test.xm", 0, 0, BASSInit.BASS_DEVICE_DEFAULT)
        Bass.BASS_Start()
    End Sub
End Class

Can someone fix this code?
It doesnt work for me, this both lines:

        Bass.BASS_Init(0, 44100, BASSInit.BASS_DEVICE_DEFAULT)
        Bass.BASS_MusicLoad(My.Computer.FileSystem.SpecialDirectories.Temp + "./test.xm", 0, 0, BASSInit.BASS_DEVICE_DEFAULT)

Can someone try this code and fix it?
pls help 

[Knight_Rider]

I hate it if somebody doesn't exactly tell WHAT doesn't work
And which language -.-

But as I assume it's VB.Net:

My.Computer.FileSystem.SpecialDirectories.Temp + "./test.xm"

Why "./test.xm" and not  "\test.xm"?

[JM-DG]

It looks like he/she wants to access a xm which is situated in the previous folder... I guess 

[Latch]

It looks like he/she wants to access a xm which is situated in the previous folder... I guess 

Knight_rider is correct.  There should be no forward slashes.  Every Microsoft OS since DOS 1.0 uses backslashes.  The single dot should also not be there.  Its an OLD DOS reference which refers to the current folder and should not be used in code ANYWHERE.