Jump to content
Strawberry Orange Banana Lime Leaf Slate Sky Blueberry Grape Watermelon Chocolate Marble
Strawberry Orange Banana Lime Leaf Slate Sky Blueberry Grape Watermelon Chocolate Marble

MSFN is made available via donations, subscriptions and advertising revenue. The use of ad-blocking software hurts the site. Please disable ad-blocking software or set an exception for MSFN. Alternatively, register and become a site sponsor/subscriber and ads will be disabled automatically. 


  • Content count

  • Donations

  • Joined

  • Last visited

Community Reputation

0 Neutral

About spriditis

  • Birthday 01/01/1909

Profile Information

  • OS
    XP Pro x86
  1. iis on xp is LAN adress, for other people over internet to reach you server, they need external IP. You're probably using router, so port forwarding has to configured. Of course, also incoming TCP 80 rule on firewall has to be allowed.
  2. Also beware that you should write key for quick launch when explorer is not running (before it is started / after closed) or it will overwrite your modification when it exits..
  3. Get Key

    It fails because not everyone uses US regional settings: For me GetVarDate returns data in format "yyyy.MM.dd. HH:mm:ss" Therefore there is no T1(2) - either way you should build you date string from seperate parts, not split unknown format. Like: GetVarDate is ok for output, but to compare values, build it from parts. Anyhow this will return value as "yyyy.MM.dd. HH:mm:ss" no matter what settings are configured. dt.Year & "." & Right("00" & dt.Month, 2) & "." & Right("00" & dt.Day, 2) & ". " & _ Right("00" & dt.Hours, 2) & ":" & Right("00" & dt.Minutes, 2) & _ ":" & Right("00" & dt.Seconds, 2) Uptime function - minor modification by me, not sure what was original: Function TimeSpan(dt1, dt2) Dim seconds, minutes, hours, days If (isDate(dt1) And IsDate(dt2)) = False Then TimeSpan = "" Exit Function End If seconds = Abs(DateDiff("S", dt1, dt2)) minutes = seconds \ 60 hours = minutes \ 60 days = hours \ 24 hours = hours mod 24 minutes = minutes mod 60 seconds = seconds mod 60 TimeSpan = days & " days " & _ Right("00" & hours, 2) & "h " & _ Right("00" & minutes, 2) & "m " & _ Right("00" & seconds, 2) & "s" End Function
  4. Changing system info

    "CSDVersion" will only change OSVERSIONINFO.szCSDVersion (includes Service Pack version) return value of GetVersionEx API function, so System Properties will be fooled. For a live system - don't forget to restart OS for changes to take effect: (HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Windows).
  5. Unicode search with Explorer

    OS: Windows XP SP3 Regional Settings - support files for East-Asian languages installed You didn't specified what exactly doesn't work Tested - both search by name and content works normally.. For example: By name: ペンシルベニア.txt or by content: 进行比较 By the way: Indexing Service is Disabled
  6. Changing system info

    System: First two lines are from String Table resources: sysdm.cpl 12:1033 180 Microsoft Windows XP 191 Professional sysdm.cpl 12:1033 180 "Version 2002" "Service Pack 3": //Looks like from WinAPI - GetVersionExW Registered to: [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion] "RegisteredOwner" "RegisteredOrganization" "ProductId" Computer info: [HKEY_LOCAL_MACHINE\HARDWARE\DESCRIPTION\System\CentralProcessor\0] "ProcessorNameString" (wrapped in two lines) [CPU & RAM is from WinAPI - dynamic] -------------------------- But You can't spoof OS version for other programs using this..
  7. It is "Windows is shutting down..." Winlogon.exe String Table 106:1033 1684 "Windows is shutting down..."
  8. Devices and Printers, how to remove from start menu.

    Start Menu -> Properties - Star Menu tab - Customize... button: uncheck Devices and Printers. The same: [HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Advanced] "Start_ShowPrinters"=dword:00000000 Anyway - other possible options and key paths where to write them: [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Explorer\StartMenu\StartPanel]
  9. Adding warning messages to programs

    Try play with [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Image File Execution Options\programname.exe] "Debugger"="program to run in place" Running that program will run "program to run in place" instead (with original exe name as Param1 and rest as param2, param3, etc. To avoid recursion, you need to do something like this: 1. User runs program.exe -> your program runs, shows warning, 2. Temporary remove "Debugger" value, so you can start original normaly. 3. Run Param1, passing rest of params. 4. Restore "Debugger", close your program. Of course this only works for executable_name.ext - renaming it will easily avoid this trick.
  10. If you're talking about Default user profile customization - sysprep will copy over Built-in Administrator profile hive. I usually don't want that, so i backup Default User hive (contains my config) and restore it afterwards.. Or were you talking about unattended customization? did you edited Sysprep.inf file correctly?
  11. yap, sometime, you just think "why didn't I though f that" I suppose, this would get less overhead: Set colItems = objWMIService.ExecQuery("Select Name, Version from Win32_Product Where Name Like 'Microsoft .NET Framework%'")For Each objItem in colItems Wscript.Echo objItem.Name & " - " & objItem.VersionNext
  12. gunsmokingman - there is a problem with vbs script: For .Net Fw 1.1 - there is no "Version" value in [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\NDP\v1.1.4322] I have installed: .Net FW 1.1 - dotnetfx.exe SP1 - NDP1.1sp1-KB867460-X86.exe Security Update - NDP1.1sp1-KB928366-X86.exe Actually, the idea was to enumarate keys and the name of that key would give version.. But "SP" value gives correct data for last installed Service Pack, though.. And I haven't used 1.0 in ages, so verify about that.. ------------------ Yzöwl: Just listing folder will give you false results - because updates tend to create folders for version that isn't installed. Like on my Windows XP SP3 (with 3.5 SP1 [contains 2.0 SP2, 3.0 SP2, 3.5 SP1]): v1.0.3705 v1.1.4322 v2.0.50727 v3.0 v3.5 Folders v1.0.3705 and v1.1.4322 contain just few files from security updates (.config, .cfg and mscormmc.dll). The correct way is to enumarate registry.... ---------------- Edit2: For .Net FW 1.0 (With SP3) the reg key is [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\Full\v1.0.3705] [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\Full\v1.0.3705\1033\Microsoft .NET Framework Full v1.0.3705 (1033)] "install"=dword:00000001 But no Version or SP value. [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\NET Framework Setup\Product\Microsoft .NET Framework Full v1.0.3705 (1033)] "Version" - shows the same data as key name..
  13. Can't open some files after re-installation

    I hear that a lot Welcome to the world of quantum mechanics - once to try check it, it swaps states
  14. Can't open some files after re-installation

    I suppose it wasn't clean reinstall (no format + on top of old system)? Check notepad.exe - both System32 and wow counterpart and also registry settings for .txt (txtfile), .cmd (cmdfile), etc.. Try running notepad and droping one of those file on notepad. I doubt that it's security permissions releated, but better check those too. Post your results afterwards..