Contents
Articles
Behaviors
Books
Director News
Director Web Sites
FAQ
Games
Mailing Lists
News Groups
Project Examples
Reviews
Software
Tools
Useful Web Sites
Utilities
Xtras

Don't miss these
A Simple Coloring Book
Lingo and Shockwave Sourcebook
Orbital Slave
ini-script
Audio Xtra
Send E-mail Via Browser
Mouse click or Key press
Sound not playing in Shockwave
Space Invaders
markerXtra
 

 

 

Behavior Check and launch dialup

Added on 10/2/2000

 

Compatibilities:
D7 D8 PC Script

Required Xtras:
Buddy API

This item has not yet been rated

Author: MediaMacros (website)

Checks to see if there is an internet connection, and if not launches the default dialup-connection on the users machine. Use like this... launchDialup()

on launchDialup me
  if the environment.internetconnected <> #online then
    connection = baReadRegString( "RemoteAccess", "Default", "", "hkey_current_user" )
    if connection <> "" then
      baRunProgram( "rundll rnaui.dll,RnaDial" && Connection, "normal", false )
    else
      alert ("No dialup connection is configured on this machine.")
    end if
  end if
end


on getBehaviorDescription me
  describe = "Checks to see if there is an internet connection, and if not launches the default dialup-connection on the users machine.  Use like this..." & return & "launchDialup()"
  return describe
end

 


Contact

MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA

Send e-mail