| |
| |
|
Martin
Heller | Hiho,
ich hab in der Registry einen Ordner gefunden, in dem einige Pfade drinne stehen. Ich würde gerne wissen, ob die Pfade auch in anderen Windowsversionen gefunden werden.
Könntet ihr mal bitte den Code ausführen und den Zwischenablageninhalt hier posten?
Wäre gut wenn ihr euere Windowsversion auch noch mit posten könntet. Ich kann mit dem Wert von $WinVer nicht wirklich etwas anfangen. Weiß jemand, welche Nummer, welches System ist?
Martin
KompilierenMarkierenSeparieren |
|
| |
| |
| |
|
|
| Hmm, ich kanns zwar nicht testen auf 98ern, glaube aber diesen Pfad auch von 98ern zu kennen.
Hier mein Ergebnis:[quote:67f16c498d]Windowsversion. 5.1
AppData...ok
Desktop...ok
Favorites...ok
Fonts...ok
Personal...ok
Programs...ok
SendTo...ok
Start Menu...ok
Startup...ok[/quote:67f16c498d]Bis denne, iF  |
|
| |
| |
| |
|
|
| Kein Problem:
Windows 98
[quote:6f2dcb28a6]
Windowsversion. 4.10
AppData...ok
Desktop...ok
Favorites...ok
Fonts...ok
Personal...ok
Programs...ok
SendTo...ok
Start Menu...ok
Startup...ok
[/quote:6f2dcb28a6] |
|
| |
| |
| |
|
|
| Windows95:
[quote:a249517973]
Windowsversion. 4.0
AppData...ok
Desktop...ok
Favorites...ok
Fonts...ok
Personal...ok
Programs...ok
SendTo...ok
Start Menu...ok
Startup...ok
[/quote:a249517973]
Ach ja.. geht das so überhaupt? Ich habe das zwar mit @READINI$() noch nicht getestet, aber wenn man in der Registry einen String ausliest, der nicht ausgelesen werden kann, bedeutet das nicht unbedingt, daß die zurückgegebene Bereichsvariable leer ist. Da Profan auch über die API funktioniert, könnte das vielleicht falsche Ergebnisse bringen. Besser wäre das vielleicht so (PUTCLIP$ funktioniert bei mir so übrigens auch nicht):
KompilierenMarkierenSeparierenDeclare paths$[9],win$,EDIT&
paths$[1] = "AppData"
paths$[2] = "Desktop"
paths$[3] = "Favorites"
paths$[4] = "Fonts"
paths$[5] = "Personal"
paths$[6] = "Programs"
paths$[7] = "SendTo"
paths$[8] = "Start Menu"
paths$[9] = "Startup"
Def Path(1) ReadIni$("HKEY_1", "SoftwareMicrosoftWindowsCurrentVersionExplorerShell Folders", paths$[%(1)])
WINDOWSTYLE 31
Windowtitle "Folders testen"
Window 0,0-640,440
LET EDIT&=@createMultiEdit(%HWND,"",100,20,400,350)
Set("Errorlevel", 0)
Cls
ClearLIST
ADDSTRING "Windowsversion. " + $WinVer
ADDSTRING ""
Whileloop 9
If Path(&loop) <> ""
Color 2, 15
ADDSTRING Paths$[&loop] + "..."+"ok" + Chr$(13)
Else
Color 4, 15
ADDSTRING Paths$[&loop] + "..."+"fehlerhaft!" + Chr$(13)
EndIf
Color 0, 15
ADDSTRING Path(&loop)
Wend
@MOVELISTTOEDIT(EDIT&)
While 0=0
WEND
|
|
| |
| |
| |
|
|
ASKTEC | Hier das Ergebnis für WIN XP Prof...
Windowsversion. 5.1
AppData...ok
Desktop...ok
Favorites...ok
Fonts...ok
Personal...ok
Programs...ok
SendTo...ok
Start Menu...ok
Startup...ok
Gruß
Andreas |
|
| |
| Profan 7.6 / XProfan 8 / XProfan 9 ~ W2k Prof. / Win XP Prof. ~ AMD XP2000+ / P4 3.80 GHz | 10.08.2004 ▲ |
|
| |
|
|
Martin
Heller | Erstmal danke fürs testen.
@AH: Ich hab es vorher mit einem nicht vorhandenen Reg-Eintrag getestet. Es wird ein Leerstring zurückgegeben.
@IF: Hast du das Thema verschoben? Dachte ich hätte es beim Stammtisch gepostet.
Kann mir jemann den Rückgabewert von $WinVer erklären? Welche Zahl was bedeutet? Oder kennt jemand eine bessere Alternative zu $WinVer?
Martin |
|
| |
| |
| |
|
|
| Jepp, ich hab es verschoben. Im Stammtisch geht es eher weniger um Programmierung. Ich fand es bei Programmierung / Allgemein besser aufgehoben.
Nichts desto Trotz kommt hier ja nix weg, und wiedergefunden wirds eh weil angezeigt wird wo was Neues gepostet wird.
Bis denne, iF  |
|
| |
| |
| |
|
|
| Hallo Martin...
Ich hab mir irgendwie gedacht, daß diese Frage noch kommt, und deshalb meine Windowsversion mit dazu geschrieben. Schau mal hier nach:
[...] 
Die Problem mit der nicht leeren Bereichsvarialen hatte ich unter Windows2000 PRO, als ich versucht hatte, im Adminprofile einen Key und HKEY_LOCAL_MACHINE auszulesen, der durch Privilegien geschützt war. Ich werde das bei mir nochmals mit READINI$ und einem Userprofile mit eingeschränkten Rechten testen.
Als ich versucht habe, einen Registryhive eines anderen Users im Adminprofile mit Writeini zu bearbeiten, sind mir ebenfalls mal ziemlich drastische Probleme und Fehlermeldungen in Bezug auf RegOpenKeyEx gemeldet worden (WindowsXP). Wenn du vorhast, dein fertiges Programm nicht nur unter einem Adminprofile laufen zu lassen, würde ich mir deshalb schon genau überlegen, ob man nicht besser ganz die Finger von Readini$ und Writeini lassen sollte und einfach besser direkt zur API greift - aber das ist nur meine persönliche Meinung. |
|
| |
| |
| |
|
|
Andreas
Miethe
 | Hi Martin,
zu Winver habe vielleicht eine Loesung.
Schau mal hier : [...] |
|
| |
| Gruss Andreas ________ ________ ________ ________ _ Profan 3.3 - XProfanX2 Win 95,98,ME,2000,XP,Vista - Win 7 32 / 64 Bit ASUS X93S - Intel Core I7-NVIDIA GForce 540M 8GB Arbeitsspeicher Homepage : [...] | 12.08.2004 ▲ |
|
| |
|
|
Martin
Heller | @Andreas: Danke, damit geht es sehr viel besser.
@AH: Hatte ehe schon überlegt, auf die API-befehle umzusteigen. |
|
| |
| |
| |
|
(941)
Deutsch
English
Français
Español
Italia