|
Thx for your answer but,
I've got a problem with section 6 !
Where shall I place the code ? I can't find any "code section" in my Report
|
|
|
|
|
Hi,
I'm pretty new to VB, but have been writing a program using VB 2008 Express. I have a section of code that will compile perfectly using VB Studio 2003, but it throws a InvalidCast Exception under VB 2005/2008. The code throws an Invalid Cast exception at [I]KeyHandle = e(field.GetValue(KeyToMonitor)[/I] line below, and as far as I can tell it is because the variable Field is passing the string Microsoft.Win32.SafeHandles.SafeRegistryHandle rather than an integer. Is this because of safe keys in VB 2005 and 2008?
If so, would anyone be able to tell me how to call the handle of the registry key opened in a way compatible with Safe Keys? I'm using the code to notify when a registry key is changed using RegNotifyChangeKeyValue.
<br />
Private Function WaitForChange() As Boolean<br />
Dim notifyEvent As New Threading.AutoResetEvent(False)<br />
Dim KeyHandle As IntPtr<br />
Dim KeyToMonitor As RegistryKey<br />
KeyToMonitor = Registry.CurrentUser.OpenSubKey("Software\Microsoft\MediaPlayer\CurrentMetadata", False)<br />
Dim regKeyType As Type = GetType(RegistryKey)<br />
Dim field As System.Reflection.FieldInfo<br />
field = regKeyType.GetField("hkey", Reflection.BindingFlags.Instance Or Reflection.BindingFlags.NonPublic)<br />
KeyHandle = CType(field.GetValue(KeyToMonitor), IntPtr)<br />
<br />
Dim err As Integer<br />
err = NativeMethods.RegNotifyChangeKeyValue(KeyHandle, _<br />
True, NotifyFilterFlags.REG_NOTIFY_CHANGE_ATTRIBUTES _<br />
Or NotifyFilterFlags.REG_NOTIFY_CHANGE_LAST_SET _<br />
Or NotifyFilterFlags.REG_NOTIFY_CHANGE_NAME _<br />
Or NotifyFilterFlags.REG_NOTIFY_CHANGE_SECURITY, _<br />
notifyEvent.Handle, True)<br />
<br />
If err = 0 Then<br />
notifyEvent.WaitOne()<br />
RaiseEvent KeyChanged(CObj(Me), New EventArgs())<br />
Return True<br />
Else<br />
Debug.WriteLine(err)<br />
Return False<br />
End If<br />
End Function<br />
|
|
|
|
|
|
you need to describe more of what your doing... there is no way anyone can help you fill in the blanks when that's all you give us.
are all 3 tiers on one machine?
or
are you using webservices/wcf/??????
you said "finished writng the code for all" that seems impossible when one of your tiers should be the ui...
'Never argue with an idiot; they'll drag you down to their level and beat you with experience.' ~ anonymous
'Life's real failure is when you do not realize how close you were to success when you gave up.' ~ anonymous
|
|
|
|
|
Wow, you have written the code for all 3 tiers of a hospital management system and cannot connect them together. Can I get the name of the hospital you wrote this for, I seriously need to avoid it.
Never underestimate the power of human stupidity
RAH
|
|
|
|
|
oxela wrote: so i finished writng the code for all.but i can't coonect with the user interface.
No you didn't. The user interface IS a layer. I'm willing to be you didn't write anything that resembles any of the layers.
oxela wrote: please help me
With what?? You haven't asked a question that anyone on this planet can answer.
|
|
|
|
|
I am sory guys i dont have any expiriance on posting messages.what i want to say is that i wrote the code only for one small class,i use IIs as aserver,so how can i connect the buissness layer with the other layer for this specific class.
|
|
|
|
|
Hi,
I have a datatable, which contains one column.(it contains boolean type value(true/false)).Now my question is, can i update all rows value to true without using the loop?
Thank You
|
|
|
|
|
|
I am a bit of a newbie and don't understand something... When you have a base class with a parameterized constructor you need to call mybase.new on the derived classes to instantiate the base class because the base class is called first which got me thinking if that was always the case even when there is no explicit constructor in the base class. So after fooling with a simple example I discovered that indeed it it is true, because even a non paramaterized base is instantiated when the derived class is called. So for example :
Class Fruit
Sub New()
Console.WriteLine("hello, im a fruit")
End Sub
End Class
Class Apple : Inherits Fruit
Sub New()
Console.WriteLine("hi, im an apple")
End Sub
End Class
the console would output both. My question is why? I don't understand why the base class needs to be created at all? Isn't it enough for a derived class to be created that has all the methods and fields of the base without creating a separate object just for the base class or perhaps I don't understand what is really going on behind the scenes.
If someone could enlighten me I would appreciate it.
Thanks,
Steve
|
|
|
|
|
When Apple inherits from Fruit, and you want to create an Apple, then you (or the system) create a Fruit, then specialize it into an Apple; you can't make an Apple that is not a Fruit. Everything you put into Fruit (data fields, methods, constructors) is available (not necessarily accessible) to derived classes as well. The constructor may initialize some data fields, so you need it to be called no matter what.
Luc Pattyn [Forum Guidelines] [My Articles]
The quality and detail of your question reflects on the effectiveness of the help you are likely to get.
Show formatted code inside PRE tags, and give clear symptoms when describing a problem.
|
|
|
|
|
hi all genius people!
my app has picture boxes or labels moving through the whole
form in various directions. to do this i am placing the code
below to a timer of interval = 1 ms
pic1.left += some constant
pic1.top += some constant
when this constant is 1 the motion is quite smooth
but when this constant has a larger value say 5 then the motion
is rough
i tried using loops like this and placing it in the same timer
for x = 1 to 5
pic1.left += 1
pic1.top += 1
next x
but as my app has many pic boxes and
this timer runs for about 2 mins (=2*60*60*1000 ms)
this takes a lot of cpu
any ideas??
my sole intention is to make the motion smooth
thankx
TheMrProgrammer
|
|
|
|
|
The only way you're going to get smooth motion is to stop using controls to render all of your content, and even then, you might not get what you want, but it'll be a VAST improvement. You have to handle the Paint event of your form and draw all of your content yourself. Controls are too expensive to redraw and, from what I see if your small code snippet, you're not giving the form any time to redraw the controls in a timely fashion.
|
|
|
|
|
so you suggest to drop all the controls and stick to graphics object?
and/or i should increase the interval of the timer? to maybe 10 ms or what?
TheMrProgrammer
|
|
|
|
|
Hi,
1. a simple timer will not provide small steps such as 1 msec (see my timers article for details).
2. you don't need such small times anyway; a movie is built with some 24 frames per second, that is 40 msec per frame.
3. you do need double-buffering, so you don't see the building-up of each frame.
4. As Dave said, get rid of the Controls, paint it all to a single Panel.
Luc Pattyn [Forum Guidelines] [My Articles]
The quality and detail of your question reflects on the effectiveness of the help you are likely to get.
Show formatted code inside PRE tags, and give clear symptoms when describing a problem.
|
|
|
|
|
hi,
i am doing customer details in vb.net 2.0 with ms access.
i have using customer name,address,city,mail id..
now i did saved all things.
but when i retrieve particular customer in textbox's.
address will printed continuously in tetxbox.
so i need to view line by line .
example,
12,NH road,
PSr Layout,
Chennai.
tis address view same format in textbox.
Yours,
KaNNaN
-----------------------------------------------------------------
"Success is When Ur Signature Becomes An Autograph"
Mail To : foreverkans@gmail.com
|
|
|
|
|
I see you are saving the address in a single DB column. Save '\n' too where ever you need one. Then while display it will be shown in new line.
जय हिंद
|
|
|
|
|
tell me some example for that..
input only thr multiline textbox
Yours,
KaNNaN
-----------------------------------------------------------------
"Success is When Ur Signature Becomes An Autograph"
Mail To : foreverkans@gmail.com
|
|
|
|
|
I'd suggest redesigning the database to hold the address as separate columns, and redesigning the GUI to use separate textboxes for each column.
It will pay dividends in the long run. 
Regards
David R
---------------------------------------------------------------
"Every program eventually becomes rococo, and then rubble." - Alan Perlis
|
|
|
|
|
I need to compare the dates with in a file and write the lines based on the latest date.
Code Sofar:
modified 28-Nov-12 8:11am.
|
|
|
|
|
Why not use DateTime.Compare method?
If you need to compare only the date part, then use DateTime.ToShortDateString() and then compare the strings.
जय हिंद
|
|
|
|
|
Thanks for ur reply.
If u check my code, u can find that i use .substring().
eg:
dateTime = temp.Substring(p(9), p(10) - p(9))
when i declare dateTime and dateTime1 as Date, i will not able to do the .substring...
any help will be helpfull...
|
|
|
|
|
Why do you need to use substring?
जय हिंद
|
|
|
|
|
to get the value within that particular range
|
|
|
|
|
Dim created, created1 As Date
...Lots of lines removed
baloon = temp.Substring(p(8), p(9) - p(8))
dateTime = temp.Substring(p(9), p(10) - p(9))
created = CDate(dateTime)
qty = temp.Substring(p(10), temp.Length - p(10))
While sa.Peek() >= 0
temp1 = sa.ReadLine()
name1 = temp1.Substring(0, p(1)) ', p(2) - p(1))
child1 = temp1.Substring(p(1), p(2) - p(1))
desF1 = temp1.Substring(p(2), p(3) - p(2))
desAF1 = temp1.Substring(p(3), p(4) - p(3))
desA1 = temp1.Substring(p(4), p(5) - p(4))
desAA1 = temp1.Substring(p(5), p(6) - p(5))
ecn1 = temp1.Substring(p(6), p(7) - p(6))
dnf1 = temp1.Substring(p(7), p(8) - p(7))
baloon1 = temp1.Substring(p(8), p(9) - p(8))
dateTime1 = temp1.Substring(p(9), p(10) - p(9))
created1 = CDate(dateTime1)
qty1 = temp1.Substring(p(10), temp1.Length - p(10))
If name = name1 And child = child1 And dnf = dnf1 And baloon = baloon1 And created < created1 Then
sw.WriteLine(name1 & child1 & desF1 & desAF1 & desA1 & desAA1 & ecn1 & dnf1 & baloon1 & dateTime1 & Space(22 - dateTime1.Length) & qty1)
Else
sw.WriteLine(name & child & desF & desAF & desA & desAA & ecn & dnf & baloon & dateTime & Space(22 - dateTime.Length) & qty)
End If
name = name1
Regards
David R
---------------------------------------------------------------
"Every program eventually becomes rococo, and then rubble." - Alan Perlis
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
