I have an input box statement which can take a integer as below:
InputBox("enete r the number")
-----
-------
If the user doesn't enter any input for a particular time say 30 secs, i should be able to continue to next line.
Please let me know your how can implement this?
10  2366 
i dont undetsrand the logic
if there is no data input what is the use of input box ?
i dont undetsrand the logic
if there is no data input what is the use of input box ?
=============== =============== =============== =====
' logging off a Computer
Dim a,b,x,y,z
a= InputBox("log off after _______ minute/s?")
b=a*60000
WScript.Sleep b
Choice = InputBox("if you want cancel enter 1,if yoy want to still log off enter 2")
Select Case choice
Case 1
MsgBox ("bye")
Case 2
strComputer = "."
Set objWMIService = GetObject("winm gmts:{impersona tionLevel=imper sonate,(Shutdow n)}\\" & strComputer & "\root\cimv 2")
Set colOperatingSys tems = objWMIService.E xecQuery _
("Select * from Win32_Operating System")
For Each objOperatingSys tem in colOperatingSys tems
objOperatingSys tem.Win32Shutdo wn(0)
Next
Case Else
MsgBox("invalid entry")
End select
-----------------
The intention of above code is:
User will schedule log off PC after a particular time. Inputbox will be prompted after that particular time. If the user is available at that time, he will cancel the operation and if the user is not available the PC should be logged off. So If no input is provided for the input box, I should be able to overcome(skip) that log off the PC.
Since input box is a modal window the user must respond to that.
better use a textbox .
set a default value.
if u user enters a value over write that .
if does not run with default value after the default time interval
Since input box is a modal window the user must respond to that.
better use a textbox .
set a default value.
if u user enters a value over write that .
if does not run with default value after the default time interval
I am stuck in setting the "default time interval", can u please let me know how I can implement this?
if the user does not enter any value after what time you want the code to execute.
if the user does not enter any value after what time you want the code to execute.
after 1 minute i want to execute the code!
after 1 minute i want to execute the code!
Who are you ..............? ??
Who are you ..............? ??
radharkr is friend of mine!
Sign in to post your reply or Sign up for a free account.
Similar topics | |
by: Prakash |
last post by:
Does anyone know how to compact a table (only) ?
I'm using some code o move rows up & down in a continuous form & it
works fine, but after some usage the rows refuse to move up or down
until I compact the database. Then with no modifications to the code it
works well.
Any ideas anyone ?
Thx & Best Rgds,
|
by: Les |
last post by:
Hi all, i have an input box that i need the user to put in a password
and just wondered if it is possible to just show a * as he types in the
letters as per the normal password inputbox ?
any help is much appreciated.
best regards,
|
by: james.ii.turner |
last post by:
I understand why I am getting this error, I just need to find a work
around for it. Here is what I'm trying to do: There is a textbox on
my form that OnClick will ask the user for a new value, I want to take
this value and update the textbox with this value. I can't use the
recordsource option on this textbox because the Form ControlSource is
constantly changing. Here is the code I'm using:
Dim MyResponse As String
Dim MyNewVal As...
|
by: ineedahelp |
last post by:
I have declared mUser as a public variable as I need to be able to alter ALL procedures depending on the input.
Option Compare Database
Public mUser As String
I am trying to check if the user types the correct entry. If I enter 'laa' or 'LAA' or 'jg' or 'JG' into my inputbox, although it debugs properly, my IF statement always forces the msgBox display. Why isn't mUser working in my IF statement? thank you for any help!!!
Private...
|
by: jonceramic |
last post by:
Hi,
Question... Is there any way to put a wrapper on a raw string going
through SQL, or should I bite the bullet and use a recordset method
instead?
Situation:
I'm trying to have the user add comment data to a table. I calculate
and/or determine all of the variables except for that comment.
| | |
by: bxscikid |
last post by:
I am using VB 6 in order to clear a listbox (lststuff) containing material entered by the user via input boxes. I am trying to utilize a command button which will clear the list for the user. When testing the program, as soon as i click on the command button I receive a "Type mismatch" error. How can I solve this?
This is the code I am using:
Private Sub cmdclear_Click(Index As Integer)
Dim warning As String
warning =...
|
by: tragic54 |
last post by:
Hello im new to visual basic, i'm on 2005 and need a little help with a project im doing. Once this code is executed an input box pops up and asks for a football score, once the score is entered it is displayed in a listbox like this.
Points Scored 6 Total Points 6
Now the problem is when i enter the second score from the next inputbox i'm getting the problem.
Points Scored 6 Total Points 6
Points Scored 3 Total Points 6
etc.
|
by: jac130 |
last post by:
the program runs, and user is prompted via inputbox to enter an integer-this is the size of the array, then the user fills the array with that many values...but as the user enters the values, i need to check and make sure that none of hte values have already been entered in the array, if it has..then there must be a message telling user to enter a new value.
EX: user prompted to enter an integer e.g.-2, then user is prompted to enter values...
|
by: AKdlm |
last post by:
I am using Access 97 (I know) and am creating a lost and found database for materials in our company. I have it all set up so an employee can enter a sales order and pick a specific line/multiple lines from that sales order to choose what has been lost. If the quantity of the Sales order line is 30, they can choose with an input box how many was lost.
My problem is, if the quantity of the sales order is 30, they can still say they lost 40 -...
|
by: jinu1996 |
last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven tapestry of website design and digital marketing. It's not merely about having a website; it's about crafting an immersive digital experience that captivates audiences and drives business growth.
The Art of Business Website Design
Your website is...
|
by: Hystou |
last post by:
Overview:
Windows 11 and 10 have less user interface control over operating system update behaviour than previous versions of Windows. In Windows 11 and 10, there is no way to turn off the Windows Update option using the Control Panel or Settings app; it automatically checks for updates and installs any it finds, whether you like it or not. For most users, this new feature is actually very convenient. If you want to control the update process,...
| | |
by: tracyyun |
last post by:
Dear forum friends,
With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each protocol has its own unique characteristics and advantages, but as a user who is planning to build a smart home system, I am a bit confused by the choice of these technologies. I'm particularly interested in Zigbee because I've heard it does some...
|
by: agi2029 |
last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing, and deployment—without human intervention. Imagine an AI that can take a project description, break it down, write the code, debug it, and then launch it, all on its own....
Now, this would greatly impact the work of software developers. The idea...
|
by: isladogs |
last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM).
In this session, we are pleased to welcome a new presenter, Adolph Dupré who will be discussing some powerful techniques for using class modules.
He will explain when you may want to use classes instead of User Defined Types (UDT). For example, to manage the data in unbound forms.
Adolph will...
|
by: conductexam |
last post by:
I have .net C# application in which I am extracting data from word file and save it in database particularly. To store word all data as it is I am converting the whole word file firstly in HTML and then checking html paragraph one by one.
At the time of converting from word file to html my equations which are in the word document file was convert into image.
Globals.ThisAddIn.Application.ActiveDocument.Select();...
|
by: TSSRALBI |
last post by:
Hello
I'm a network technician in training and I need your help.
I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs.
The last exercise I practiced was to create a LAN-to-LAN VPN between two Pfsense firewalls, by using IPSEC protocols.
I succeeded, with both firewalls in the same network. But I'm wondering if it's possible to do the same thing, with 2 Pfsense firewalls...
|
by: 6302768590 |
last post by:
Hai team
i want code for transfer the data from one system to another through IP address by using C# our system has to for every 5mins then we have to update the data what the data is updated we have to send another system
| | |
by: bsmnconsultancy |
last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence can significantly impact your brand's success. BSMN Consultancy, a leader in Website Development in Toronto offers valuable insights into creating effective websites that not only look great but also perform exceptionally well. In this comprehensive...
| |
