|
assuming arrival method is still executing after say 40s seconds . how can i prevent the service from calling another instance pf arrival method
Public Class intestService
Protected Overrides Sub OnStart(ByVal args() As String)
Dim tDelegate As Threading.TimerCallback = AddressOf Arrival
oTimer = New System.Threading.Timer(tDelegate, Me, 10, 40)
End Sub
Public Sub Arrival(ByVal sender As Object)
'File.AppendAllText("C:\test4.txt", "AuthorLogService fires arrival at " & Now.ToString())
Try
'
Catch ex As Exception
log.WriteEntry(ex.Message, EventLogEntryType.Error)
End Try
End Sub
Protected Overrides Sub OnStop()
' Add code here to perform any tear-down necessary to stop your service.
End Sub
End Class
|
|
|
|
|
Dim TimerThreadIsRunning As Boolean Set it to true when you start your thread, and back to false at the end of Arrival method. Start the thread only if the boolean is false.
My advice is free, and you may get what you paid for.
|
|
|
|
|
hi
currently i'm facing a problem in creating a graph as well as pie chart using VBA. could any kind soul please help mi with it
Thanks
Warm Regards
Veon
|
|
|
|
|
VBA stands for Visual Basic for Applications. So, which "application" are your writing this code in??
|
|
|
|
|
Hi all
I am trying to create a small program in VB.Net (VS2005) that acts like a realtime application program like any antivirus program.
I want to know that how realtime program works?? How an antivirus program reports when a virus found??
I want to create a program that will report user when a usb device attached.
How can I do this? Should I create a Windows service or anything else??
Suggest me how can I do this.
Thanks.
Gagan
|
|
|
|
|
A "realtime" application works by sitting there waiting for a message to show up in it's message pump, or waiting for a timer tick to tell it to poll for some data, or registering for a notification message, or whatever...
A service might work, but they are not supposed to be showing a user inteface. You're best bet would be to write a normal application that gets launched when the user logs in and just puts a NotifyIcon in the tray. You'd probably want to create a hidden window and override it's WndProc, looking for the WM_DEVICECHANGE message.
|
|
|
|
|
Hi, Does anyone know how to detect whether a key on the keyboard is being pressed outside of your application? This code seems to work for detecting the keypress as long as your focus is on the form. I think it has to do with the handles myBase.keypress. Am i correct that mybase.keypress is looking for a key being pressed inside the form? Is there something else that i could write such as system.keypress or something that could detect any time the key is pressed?
Public Sub Form1_KeyPress(ByVal sender As Object, ByVal ex As KeyPressEventArgs) Handles MyBase.KeyPress
If keypush = False Then
keypush = True
End If
End Sub
I really appreciate it.
Thanks a lot.
|
|
|
|
|
RyJaBy wrote: This code seems to work for detecting the keypress as long as your focus is on the form. I think it has to do with the handles myBase.keypress. Am i correct that mybase.keypress is looking for a key being pressed inside the form?
Yes, that's right. The form key events will only fire if the form has the input focus.
RyJaBy wrote: Is there something else that i could write such as system.keypress or something that could detect any time the key is pressed?
No, there's no such event. You'd have to use a far more advanced technique called a "global keyboard hook". Just Google for that phrase, and maybe add "VB.NET" to the end, and you'll come up with loads of examples.
|
|
|
|
|
Do you know the difference between vb.net and just vb? is there a difference? Thanks again for the help I really appreciate how quickly you respond.
|
|
|
|
|
vb (I assume you mean vb6 with that) is outdated / unsupported / and is/never was any good.
vb.net is the new version and uses the .NET framework.
(that's it in a nutshell)
|
|
|
|
|
The old VB doesn't have taht ability either. You still have to use a global keyboard hook.
|
|
|
|
|
The Managed Windows API has some really easy functions for Global Keyboard Hooks.
http://mwinapi.sourceforge.net/[^]
Have you tried the Krypton Toolkit? http://www.componentfactory.com/free-windows-forms-controls.php
|
|
|
|
|
I've been using Cursor.Current to get the mouse point image but it doesn't capture alpha correctly. Is there something I can do to make it give me the alpha correctly?
Have you tried the Krypton Toolkit? http://www.componentfactory.com/free-windows-forms-controls.php
|
|
|
|
|
I can't remember exactly, but I think the Cursor class didn't work with 32-bit cursor images with alpha. I believe this had to do with a problem in GDI+, but I could be wrong.
I think you'll have to use Win32 API functions directly to get at the complete image, though I don't know exactly how to do it. I'd probably start by looking into the GetCursor and CopyImage Win32 functions.
|
|
|
|
|
Copyimage doesn't seem to convert it from a cursor to a bitmap.
Have you tried the Krypton Toolkit? http://www.componentfactory.com/free-windows-forms-controls.php
|
|
|
|
|
I have solved this. For anyone who needs help in the future with this problem, use the DrawIcon method to draw an Icon created from the handle of the cursor.
Have you tried the Krypton Toolkit? http://www.componentfactory.com/free-windows-forms-controls.php
|
|
|
|
|
|
When click the check box with the device not conectted i get the error msg box and the check do not stay thare that part works good that is what i want
When click the check box with the device conectted it runs the code
and most of the time it only runs the code once i have to stop and start my program to get it working agine
If CheckBox1.Checked Then
NumericUpDown1.Value = CType(CTemp.Text, Integer) + 1
NumericUpDown2.Value = CType(CTemp.Text, Integer) - 1
and it works
But when you click to take the check out of the check box it will not run this code
Else
NumericUpDown1.Value = 0.0
NumericUpDown2.Value = 0.0
phidgetIFK.outputs(0) = False
phidgetIFK.outputs(1) = False
End If
witch it was working before i put the bChecking
This is my code for the check box
<br />
Private Sub CheckBox1_CheckedChanged_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CheckBox1.CheckedChanged <br />
If bChecking Then Return <br />
bChecking = True <br />
If Status.Text = "Not Connected" Then <br />
MsgBox("interface is not connected. Connect USB cable and try agine.", MsgBoxStyle.OkOnly + vbCritical, "Error") <br />
CheckBox1.Checked = False <br />
bChecking = False<br />
If CheckBox1.Checked Then <br />
NumericUpDown1.Value = CType(CTemp.Text, Integer) + 1 NumericUpDown2.Value = CType(CTemp.Text, Integer) - 1<br />
Else <br />
NumericUpDown1.Value = 0.0 <br />
NumericUpDown2.Value = 0.0 <br />
phidgetIFK.outputs(0) = False <br />
phidgetIFK.outputs(1) = False <br />
End If<br />
End If<br />
End Sub<br />
I want to thanks everone for your help
|
|
|
|
|
I'm not entirely sure what you are trying to achieve but I think I see a problem with your code anyway.
* You first check bChecking, if it is not 'True', then you run the rest of the code
* Then, later on in the sub, you set CheckBox1 to checked, which I believe will then run this event again because after all, this sub runs when CheckBox1's check state changes!
* You now check bChecking again, but it is now 'True' therefore the event will exit (I think)
Maybe a better event handler would be CheckBox1.Click
|
|
|
|
|
How about simplifying things by scraping this and enabling/disabling the controls depending on if the device is connected/disconnected or not? That way, you're not trying to change the value of a checkbox inside the checkbox's own changed event.
|
|
|
|
|
you got me thare i thot i was on the right track here
do you have some information i can look at for the idea you have ??
|
|
|
|
|
I would probably be looking for a Connected and/or Disconnected event in the phidgets library. Something that tell's you a new device has shown up or been removed.
|
|
|
|
|
is it possible to show a pps or ppsx file in my form? I don't want to run it outside my application. I want to set the size of the show as my form size.
OmarMallat
|
|
|
|
|
There's no way to do this if powerpoint is not installed. It *may* be possible to embed powerpoint as a control, but I have never heard of it being done. You'd have to read the microsoft tools for office docs to see if they support that.
Christian Graus
Driven to the arms of OSX by Vista.
Read my blog to find out how I've worked around bugs in Microsoft tools and frameworks.
|
|
|
|
|
Hi all,
I am newbie in outlook programming using vb.net.
i m facing write event problem of outlook.
The code is below. What i am doing in this code. i m getting all contacts form outlook and create write events for all contact. When i m trying to edit any contact from outlook 2007 and save that contact, then it is showing last contact name and body of contact which is last write by for loop given below. But i want to show those contact full name and body info which i edit.</b> I am using vb.net2005.
For i1 As Integer = 1 To contactFolder.Items.Count
contact = DirectCast(contactFolder.Items(i1),Microsoft.Office.Interop.Outlook.ContactItem)
AddHandler contact.Write, AddressOf Contact_write_Event_
Next
Public Sub Contact_write_Event_(ByRef cancel As Boolean)
MsgBox(contact.FullName & "-----> " & contact.Body)
End Sub
Where i m wrong please guide me.
Thanks a lot
Dharmchand Dhingra
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
