Welcome to XDA

Search to go directly to your device's forum

Register an account

Unlock full posting privileges

Ask a question

No registration required
Post Reply

[Q] In need of dslreports trunk outtage saving script (pbxes)

OP MSFrara

23rd April 2012, 05:55 PM   |  #1  
OP Junior Member
Height of Harlem
Thanks Meter: 0
 
18 posts
Join Date:Joined: Dec 2008
More
Hello,

If anyone has the dslreports.com script for:

Saving a random setting on Pbxes.org when there's a trunk outage notification (free account) ,


I would highly appreciate it.

The above website is unavailable currently and am in need of the script so I can use my GV + Callback + Sipdroid. For reference, it was a simple (either JS or VB) script which saved a random setting whenever there was a trunk outage.

Or if there are any other suggestions for someone to route calls pretty much the same way for android 1.6 I would highly appreciate it as well.

Thank you


Also, a new question,


would anyone happen to know if at this date 4/23/12, Verizon charges or back charges people for using Google voice + callback for free calls as well?

thank you for any help
Last edited by MSFrara; 23rd April 2012 at 06:14 PM. Reason: additional question
23rd April 2012, 06:15 PM   |  #2  
OP Junior Member
Height of Harlem
Thanks Meter: 0
 
18 posts
Join Date:Joined: Dec 2008
More
edited in question
24th April 2012, 07:39 PM   |  #3  
OP Junior Member
Height of Harlem
Thanks Meter: 0
 
18 posts
Join Date:Joined: Dec 2008
More
..
5th February 2013, 10:36 PM   |  #4  
Junior Member
Thanks Meter: 0
 
1 posts
Join Date:Joined: Feb 2013
I created this vbscript a few years ago for the same reason. Works well. I have it set up as a Rule in Outlook, so whenever I get a trunk outage email from PBXes, it runs this script automatically.

dslreports.com/forum/r24908015-PBXes-free-acount-trunk-outtage-quick-fix

I've pasted the script here just in case the dsl reports post gets removed:
Code:
'###########################################
'## PBXes Trunk Outtage Recovery
'##        for Free Users
'##
'## Author: atomicrabbit (atombomb2k@hotmail.com)
'## Date: 2010.10.08
'###########################################
  
'Edit the following variables appropriately
'------- START EDITING HERE ... DO NOT TOUCH ANYTHING BELOW -------
'Setting Page
' Set this to one of the settigs pages of PBXes
pbxes_settingPage         = "https://www4.pbxes.com/config.php?display=extensions&extdisplay=100"
  
'Form Name
' Set this to the form name on the settings page specified above.
' It MUST be relative to the form on the page specified above
pbxes_formName            = "addNew"
  
'PBXes Login Info
pbxes_username            = "your_username"    'Your PBXes.com username
pbxes_password            = "your_password"    'Your PBXes.com passowrd
  
'IE Window Visibility
' True - IE window will be visible while processing the code
' False - IE window will be hidden and run the code in the background
pbxes_windowVisible        = False
  
'Browser Timeout
' Set max timeout for browser responsiveness (in seconds)
' Default: 7
pbxes_timeout            = 7
  
'------- STOP EDITING HERE ... DO NOT TOUCH ANYTHING BELOW -------
  
pbxes_applySettings        = pbxes_settingPage + "&clk_reload=true"
pbxes_timeout            = pbxes_timeout * 5 'because the iterations are 200ms
pbxes_tCount            = 1
  
'Create IE object
Set objIE = CreateObject("InternetExplorer.Application")
set WshShell = WScript.CreateObject("WScript.Shell")
  
'Go to PBXes.com Extensions page
objIE.Navigate pbxes_settingPage
objIE.Visible = pbxes_windowVisible
Wscript.Sleep 1000
  
'Check if not logged in
if not objIE.Document.Forms("login") is nothing then
    ' Login to PBXes if you're not already
    objIE.Document.All.Item("username").Value = pbxes_username
    objIE.Document.All.Item("password").Value = pbxes_password
    objIE.Document.All.Item("remember").checked = "false"
    objIE.Document.All.Item("btnSubmit").click
    Wscript.Sleep 2000
     
    'Go to settings page
    objIE.Navigate pbxes_settingPage
     
    'Wait for page to load
    Do
        Wscript.Sleep 200
        pbxes_tCount = pbxes_tCount + 1
    Loop While objIE.Document.Forms(pbxes_formName) is nothing AND pbxes_tCount < pbxes_timeout
end if
  
if pbxes_tCount >= pbxes_timeout AND objIE.Document.Forms(pbxes_formName) is nothing Then
  
    MsgBox "Browser timeout. Try running thescript again.", vbOkOnly, "PBXes Trunk Outtage"
    'exit script
     
Elseif not objIE.Document.Forms(pbxes_formName) is nothing Then
  
    'Submit form
    call objIE.Document.Forms(pbxes_formName).elements("Submit").click
    Wscript.Sleep 2000
  
    'Apply the changes (red bar at top)
    objIE.Navigate pbxes_applySettings
    Wscript.Sleep 2000
  
    'Close IE
    objIE.Quit
  
    MsgBox "Recovered from trunk outtage!", vbOkOnly, "PBXes Trunk Outtage"
  
Else
    MsgBox "Could not find '" & pbxes_formName & "' form on '" & pbxes_settingPage & "'.", vbOkOnly, "PBXes Trunk Outtage"
    'exit script
End if
  
'Clear variables
Set objIE                 = Nothing
Set pbxes_settingPage    = Nothing
Set pbxes_applySettings    = Nothing
Set pbxes_username        = Nothing
Set pbxes_password        = Nothing
Set pbxes_windowVisible    = Nothing
Set pbxes_timeout= Nothing
Set pbxes_tCount= Nothing
  
Wscript.quit
Last edited by atomicrabbit; 5th February 2013 at 10:44 PM.
6th February 2013, 08:03 PM   |  #5  
OP Junior Member
Height of Harlem
Thanks Meter: 0
 
18 posts
Join Date:Joined: Dec 2008
More
I actually found the script before this but still Thank You for the script as it's been helpful, although I don't know why I seem to receive "false outtage" e-mails in the sense that calls still seem to be routed with not much interruption if any, what's with that?

Thank you!!
Post Reply Subscribe to Thread

Tags
dslreports, outage, pbxes, script, trunk
Previous Thread Next Thread
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes