corsasport.co.uk
 

Corsa Sport » Message Board » Off Day » Geek Day » New to VB scripting


New Topic

New Poll
  Subscribe | Add to Favourites

You are not logged in and may not post or reply to messages. Please log in or create a new account or mail us about fixing an existing one - register@corsasport.co.uk

There are also many more features available when you are logged in such as private messages, buddy list, location services, post search and more.


Author New to VB scripting
Dan Lewis
Member

Registered: 31st Jan 05
Location: Leicestershire
User status: Offline
7th Jan 08 at 11:40   View User's Profile U2U Member Reply With Quote

<h6>Console Session,</h6>

<script language=vbscript>
function ts_connect()
set sh = createobject("wscript.shell")
sh.run "%systemroot%\system32\mstsc.exe /console /v:" & data.ip.value
set sh = nothing
end function
</script>

<form name=data>
IP/System to connect to:<BR>
<input type=text name=ip size=15><BR><BR>
<input type=button value='Connect' onclick="vbscript:if data.ip.value = '' then msgbox('You need to specify a server!') else ts_connect()">

<h6> Terminal Service </h6>


<script language=vbscript>
function ts_connect1()
set sh = createobject("wscript.shell")
sh.run "%systemroot%\system32\mstsc.exe /v:" & dat.ip1.valu
set sh = nothing
end function
</script>

<form name=dat>
IP/System to connect to:<BR>
<input type=text name=ip1 size=15><BR><BR>
<input type=button value='Connect' onclick="vbscript:if dat.ip1.valu = '' then msgbox('You need to specify a server!') else ts_connect1()">

Its just a webpage that you can put in the server name to do a rdc i currently use a batch file but want to change.
i can the console running fine but when i try a terminal it wont work any help please.
Dan Lewis
Member

Registered: 31st Jan 05
Location: Leicestershire
User status: Offline
7th Jan 08 at 15:27   View User's Profile U2U Member Reply With Quote

sorted it didnt end it in value.

 
New Topic

New Poll

  Related Threads Author Forum Replies Views Last Post
P.H.P Adam-D General Chat 36 1188
2nd May 03 at 20:34
by Blode
 
New media design work? Web design etc... mestonian Classifieds 5 744
15th Jul 03 at 19:58
by Trucido
 
ASP Scripts PaulW General Chat 8 1390
27th Jan 04 at 19:42
by VisibleMan
 
php question - need more help :( Dom Geek Day 10 827
22nd Jan 05 at 00:02
by Dom
 
look what came through the post today :-) Jas Geek Day 15 626
1st Dec 06 at 17:28
by aPk
 

Corsa Sport » Message Board » Off Day » Geek Day » New to VB scripting 29 database queries in 0.0105591 seconds