Cambiare lo sfondo del destop (vb)

[theRey89]

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è:

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

[MItaly]

Hai dichiarato la API due volte: rimuovi la prima riga.
Un paio di appunti:

• non hai specificato correttamente il linguaggio nel titolo ("VB" è generico, devi specificare se si tratta di VB6, VBA, VB.NET o quale altra versione di VB);
• il tag del linguaggio di solito sta in testa al titolo, non in fondo;
• hai allegato un sondaggio che non c'entra niente.

Dai un'occhiata al regolamento e fai più attenzione in futuro.

[alka]

Originariamente inviato da theRey89
eccomi un'altra volta a kiedervi aiuto.

Continui ad omettere la versione del linguaggio e hai aperto un sondaggio con ben poco senso.

Leggi e rispetta il Regolamento di questa area del forum.