Ciao a tutti,

eccomi un'altra volta a kiedervi aiuto.

Io vorrei ke mi si cambiasse lo sfondo del desktop in automatico.

Ho trovato sul sio della microsoft il codice, cioè:

codice:
Declare Function SystemParametersInfo Lib "User" (ByVal uAction As Integer, ByVal uparam As Integer, lpvParam As Any, ByVal fuWinIni As Integer) As Integer

Const SPIF_UPDATEINIFILE = &H1
   Const SPI_SETDESKWALLPAPER = 20
   Const SPIF_SENDWININICHANGE = &H2

   ' Enter the following Declare as one, single line:

   Declare Function SystemParametersInfo Lib "User" (ByVal uAction As Integer, ByVal uparam As Integer, ByVal lpvParam As String, ByVal fuWinIni As Integer) As Integer

Private Sub Form_Load()
      filenm$ = "\\Igp_server\InternetGamePoint\Immagine x porta.jpg"

      ' Enter the following two lines as one, single line:
      x% = SystemParametersInfo(SPI_SETDESKWALLPAPER, 0&, filenm$, SPIF_UPDATEINIFILE Or SPIF_SENDWININICHANGE)
Unload Form1
End Sub
il problema è ke cuando provo a trasformarlo in eseguibile mi viene il seguente errore:


Compile error:
Ambiguous name detected: SystemParametersInfo.


Se qualcuno mi sa dire come risolvere il mio problema mi fa un favore...

Grazie