| http://www.w3.org/ns/prov#value | - uAction As Long, _ ByVal uParam As Long, _ ByVal lpvParam As Any, _ ByVal fuWinIni As Long) As LongPrivate Const SPI_SETDESKWALLPAPER = 20Private Const SPIF_UPDATEINIFILE = &H1Private Const SPIF_SENDWININICHANGE = &H2'strImage is the name including path to the imagefilePrivate Function SetWallpaper(ByVal strImage As String) As Boolean On Error GoTo SW_Err SetWallpaper = False If Dir(strImage, vbN
|
