"cafesuite 3.50.2" the best internet cafe billing
 

[/quote][quote]






Originally Posted by Warlock1981
http://static.kaskus.co.id/images/buttons/viewpost.gif


to those cafesuite users who are having problems with the screen resolution if a customer's time is over during playing a full screen game, here's a better solution to restore the default screen of your monitor

1. first download Qres.exe (freeware) a tool that will change your screen resolution according to your setup and save it or extract to C:\Program Files\CafeAgent
2. copy and paste the script below to your notepad and save it to C:\Program Files\CafeAgent with a filename of resolution.vbs
3. in the script below just replace the value of
   
   
   Code:
   
   res1= "1024 x 768"
   res2= "1024 x 768"
   
   according to the screen resolution of your monitor
   
   
   
   
   Code:
   
   'Toggles resolutions between the following settings
   res1= "1024 x 768"
   res2= "1024 x 768"
   
   'Initialization
   set WshShell = WScript.CreateObject("WScript.Shell")
   
   'Process the resolutions
   res1=trim(lcase(res1))
   res2=trim(lcase(res2))
   
   xres1=trim(left(res1,instrrev(res1,"x")-1))
   yres1=trim(mid(res1,instrrev(res1,"x")+1))
   xres2=trim(left(res2,instrrev(res2,"x")-1))
   yres2=trim(mid(res2,instrrev(res2,"x")+1))
   
   'Get current resolution
   strComputer = "."
   Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")
   Set colItems = objWMIService.ExecQuery _
   ("Select * From Win32_DisplayConfiguration")
   
   For Each objItem in colItems
   
   currentXRes = trim(objItem.PelsWidth)
   currentYRes = trim(objItem.PelsHeight)
   Next
   
   'Decide which resolution to set
   if (currentXRes = xres1) and (currentYRes = yres1) then
   xres = xres2 : yres = yres2
   else
   xres = xres1 : yres = yres1
   end if
   
   'Run the command to set the resolution
   runstring = "cmd /c " & chr(34) & "qres.exe /x:" & xres & " /y:" & yres & chr(34)
   wshshell.run runstring,0
   
   
4. Now on your CafeStation Click
   
   
   Code:
   
   Program>Client Setup
   
   
   Code:
   
   Automation> End
   
   
5. Check Execute Program
   
   
   Code:
   
   C:\Program Files\CafeAgent\resolution.vbs
   
   
6. Click Ok and Update the CafeAgent in all client workstations

• so when the customer's time is over and if you free computer, the resolution goes back to default
• by the way it works 100%
• enjoy cafesuite users ^_^

:melonndan: :melonndan: :melonndan:

</div>