Recent Topics
-
UNSOLVED No Updates Shown
Tech Support4 -
PowerArchiver and PACL for macOS
Tech Support3 -
UNSOLVED File Browser: Operations don't trigger UAC
Tech Support7 -
Fast Ring: PowerArchiver 2019 19.00.51/54/57/58/59
Tech Support24 -
SOLVED Problem: Backspace navigation in Explorer mode
Tech Support3 -
UNSOLVED Smart AI: Preferences not intuitive
Tech Support13 -
SOLVED Find file in archive.
Wishlist9 -
UNSOLVED PA 20.00.02 not executing .exe files from archive
Tech Support10 -
PACL 9.0 Beta 2
Tech Support24 -
UNSOLVED Minor UI question
Tech Support7 -
SOLVED Slow Download
General Chat3 -
SOLVED ZIPX-jpeg-compression
Tech Support2 -
SOLVED PA standard 2019 can not create PA-archives
Tech Support2 -
UNSOLVED The PACL does not extract files from the self-extracting archive
Tech Support3 -
UNSOLVED PA 19.00.57 - Drawing issue on file type collumn
Tech Support2 -
UNSOLVED PA 19.00.57 crashes Firefox 69.0.1 in module pashlext64.dll | UserCallWinProcCheckWow
Tech Support18 -
UNSOLVED Include all PowerArchive Toolbox features in the offline installer
Tech Support3 -
UNSOLVED PA 2019 explorer preview window always blank
Tech Support3 -
UNSOLVED Encrypt files inside archive that has already been created [.zipx]
Wishlist5
I found a solution to OneDrive problem
-
Re: PowerArchiver 2019 Cloud is one-stop application for multiple clouds
The problem with OneDrive, which I reported about, seems to be specific only to Windows XP. I found a solution to this problem by installing one VBS script. After running this script and rebooting the system, the PowerArchiver Cloud successfully logs in to OneDrive if it is running as an Admin.
AES256_for_WindowsXP.vbs
langFixUrl = "http://www.skaip.su/aes-256-dlya-windows-xp" langGetHelp = "Хотите посетить блог автора и обратиться за помощью?" langStartApp = "Вы уверены, что хотите заменить системные библиотеки?" langNoDownload = "Не удалось скачать библиотеку {name}.dll в папку %windir%\system32" langWrongVersion = "Библиотека {name}.dll не может быть заменена, поскольку не совпадают указанные версии." langRestartPc = "Скрипт закончил свою работу, но изменения вступят в силу только после перезагрузки системы. Перезагрузить компьютер сейчас?" Set App = CreateObject("Shell.Application") Set Shell = CreateObject("WScript.Shell") Set Fso = CreateObject("Scripting.FileSystemObject") Set TypeLib = CreateObject("Scriptlet.TypeLib") Function RunAsAdministrator() If WScript.Arguments.Length = 0 Then Set Systems = WmiQuery("Select Caption From Win32_OperatingSystem") For Each System In Systems If InStr(System.Caption, "Windows XP") Then Exit Function End If Next App.ShellExecute "wscript.exe", """" & WScript.ScriptFullName & """ RunAsAdministrator", , "runas", 1 WScript.Quit End if End Function Function WmiQuery(query) Set Wmi = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2") Set WmiQuery = Wmi.ExecQuery(query) End Function Function DownloadFile(url, file) Set Http = CreateObject("Microsoft.XMLHTTP") Http.Open "GET", url, False Http.Send Set Stream = CreateObject("Adodb.Stream") Stream.type = 1 Stream.open Stream.write Http.responseBody Stream.saveToFile file, 2 End Function Function RenameDll(sourcePath, dir, name) dirPath = Shell.ExpandEnvironmentStrings("%windir%\" & dir) If Fso.FolderExists(dirPath) Then targetPath = dirPath & "\" & name & ".dll" backupPath = targetPath & "." & UNIXTIME If Fso.FileExists(targetPath) Then Fso.MoveFile targetPath, backupPath End if Fso.CopyFile sourcePath, targetPath End if End Function Function ReplaceDll(name, version, url) tmpPath = Shell.ExpandEnvironmentStrings("%windir%\system32\" & name & ".dll.tmp." & UNIXTIME) DownloadFile url, tmpPath If Not Fso.FileExists(tmpPath) Then ShowError Replace(langNoDownload, "{name}", name) WScript.Quit End if If Fso.GetFileVersion(tmpPath) <> version Then ShowError Replace(langWrongVersion, "{name}", name) Fso.DeleteFile(tmpPath) WScript.Quit End if RenameDll tmpPath, "system32", name RenameDll tmpPath, "system32\dllcache", name RenameDll tmpPath, "ServicePackFiles\i386", name Fso.DeleteFile(tmpPath) End Function Function ShowError(msg) btn = MsgBox(msg + vbNewLine + langGetHelp, 20, "ERROR!") If btn = 6 Then Shell.Run langFixUrl End If End Function Function AppStart() RunAsAdministrator() ReplaceDll "dssenh", "5.1.2600.6924", "http://download.skaip.org/iexpress/AES256_for_WindowsXP/files/dssenh.dll" ReplaceDll "rsaenh", "5.1.2600.6924", "http://download.skaip.org/iexpress/AES256_for_WindowsXP/files/rsaenh.dll" ReplaceDll "schannel", "5.1.2600.6926", "http://download.skaip.org/iexpress/AES256_for_WindowsXP/files/schannel.dll" btn = MsgBox(langRestartPc, 36) If btn = 6 Then Shell.Run "shutdown.exe -r -t 0" End If End Function If MsgBox(langStartApp, 36) = 6 Then UNIXTIME = DateDiff("s", "01/01/1970 00:00:00", Now()) AppStart() End If
-
@Michael72 said in I found a solution to OneDrive problem:
The problem with OneDrive, which I reported about, seems to be specific only to Windows XP. I found a solution to this problem by installing one VBS script. After running this script and rebooting the system, the PowerArchiver Cloud successfully logs in to OneDrive if it is running as an Admin.
However, now I have another problem.
My OS: Windows XP Home Edition, SP3
The version number and date of the program: PowerArchiver 2019 Standard 19.00.47 (05/2019)How to reproduce the problem
Since it is recommended that we hold back from using the accounts with the type of administration for everyday work on the computer, I always have two accounts, an Admin account and a normal account from which I normally work.
So, I have two accounts on my computer. One Michael, and the other Admin.
I logged in as Michael (normal account with limited rightes).
I run the PowerArchiver as an Admin by using Windows “Run As…” option.
When the dialog window of account control popped up I chose another account with administration rights.The program has started successfully.
I сlick on Clouds button to open the Cloud Browser.
Now when I click on the OneDrive profile I get a successful connection to the cloud.
I close the PowerArchiver 2019 Cloud and also close the PowerArchiver 2019.
Now I am running the PowerArchiver 2019 as a Michael.
I сlick on Clouds button to open the Cloud Browser.
Now when I click on the OneDrive profile an empty Authorize dialog box opens and does not connect to the cloud.… Michael
-
Thanks @Michael72
gonna test this out to confirm as well and log it in.
We’ll reply with further questions if needed.
thanks again!