|
You can use a regular expression to validate the input. Also, if you use a regex and the input in invalid, it can return the closest match to the format that is needed. Say the user inputs 123.453.24265. The following regex will return a match with 123.45:
^([0-9]{1,}.[0-9]{0,2}){0,1}
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
I'm having some issues with an attempt to serialize an object to file using a BinaryFormatter. The error I keep getting is:
The type System.Runtime.Remoting.ServerIdentity in Assembly mscorlib, Version=1.0.5000.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 is not marked as serializable.
Problem #1, I have no idea where I am referencing ServerIdentity. This is the method I am running in at the time of error:
Private Shared Sub DumpUnprocessedDeployments()
Try
Dim cntr As Integer = CollInstance.Count
If cntr > 0 Then
logger.WriteLog("Dumping " + cntr.ToString.Trim() + " unprocessed deployments....")
Dim s As Stream = File.Open("bin\webdeploy.dmp", FileMode.OpenOrCreate, FileAccess.ReadWrite)
Dim bf As New BinaryFormatter
Dim dpl As Deployment
Dim al As New ArrayList
For Each dpl In CollInstance
logger.WriteLog(dpl.Project + " " + dpl.State + " " + dpl.Package + " Requester: " + dpl.User, False)
bf.Serialize(s, dpl) ' <=== ERRORS OUT HERE
Next
s.Close()
Else
logger.WriteLog("No Unprocessed Deployments to Dump")
End If
Catch ex As Exception
logger.WriteLog("An ERROR was Encountered while Generating the Dump File....")
logger.WriteLog(ex.Message, False)
End Try
End Sub
Here is the Code for the Serialized Object:
Imports System
Imports CM.WebDeployment.Interfaces
<serializable()> Public Class Deployment
Inherits MarshalByRefObject
Implements IDeployment
Private IsPending As Boolean
Private RunWhen As Date
Private FTPDir As String
Private FTPPwd As String
Private FTPSvr As String
Private FTPUsr As String
Private HPkg As String
Private HPwd As String
Private HProj As String
Private HState As String
Private HUsr As String
#Region " Object Constructor(s) "
Public Sub New()
MyBase.New()
End Sub
Public Sub New(ByVal HarProj As String, ByVal HarState As String, ByVal HarPackage As String, _
ByVal HarUser As String, ByVal HarPassword As String, ByVal FServer As String, _
ByVal FDir As String, ByVal FUser As String, ByVal FPassword As String, _
ByVal RunTime As Date)
MyBase.New()
HProj = HarProj
HState = HarState
HPkg = HarPackage
HUsr = HarUser
HPwd = HarPassword
FTPSvr = FServer
FTPDir = FDir
FTPUsr = FUser
FTPPwd = FPassword
RunWhen = RunTime
End Sub
#End Region
#Region " Implemented Properties From IDeployment "
Public ReadOnly Property FTPDirectory() As String Implements Interfaces.IDeployment.FTPDirectory
Get
Return FTPDir
End Get
End Property
Public ReadOnly Property FTPPassword() As String Implements Interfaces.IDeployment.FTPPassword
Get
Return FTPPwd
End Get
End Property
Public ReadOnly Property FTPServer() As String Implements Interfaces.IDeployment.FTPServer
Get
Return FTPSvr
End Get
End Property
Public ReadOnly Property FTPUser() As String Implements Interfaces.IDeployment.FTPUser
Get
Return FTPUsr
End Get
End Property
Public ReadOnly Property Package() As String Implements Interfaces.IDeployment.Package
Get
Return HPkg
End Get
End Property
Public ReadOnly Property Password() As String Implements Interfaces.IDeployment.Password
Get
Return HPwd
End Get
End Property
Public ReadOnly Property Project() As String Implements Interfaces.IDeployment.Project
Get
Return HProj
End Get
End Property
Public ReadOnly Property RunTime() As Date Implements Interfaces.IDeployment.RunTime
Get
Return RunWhen
End Get
End Property
Public ReadOnly Property State() As String Implements Interfaces.IDeployment.State
Get
Return HState
End Get
End Property
Public ReadOnly Property User() As String Implements Interfaces.IDeployment.User
Get
Return HUsr
End Get
End Property
#End Region
Public Property Pending() As Boolean
Get
Return IsPending
End Get
Set(ByVal Value As Boolean)
IsPending = Value
End Set
End Property
End Class
Problem #2, this was working 3 days ago (no changes made to the Deployment class).
Any help on this would be great.
|
|
|
|
|
Helo, I want to setup an setup project. In my setup project, I want to include two solution, how can i do that? I also want to include sound to my project. How can i add music to the setup project?
Thanks for your idea...
Learning .NET
|
|
|
|
|
Using the VS Installer project, you can't do either without coding custom actions.
You'll have to add custom actions to the setup project to get it add multiple solutions. You can add multiple PROJECTS, but not solutions. The VS Installer project is just that, a project that is part of a solution, the installation part.
Sound would require you to add code to unpack, then play an .AVI. It is possible to do using Wise Package Studio. I don't know how to do it using the VS Installer project. I also, have no examples...
[EDIT]
I should've woke up first before I posted! The easiest way to add sound is to write your own SETUP.EXE that wraps the .MSI file. Your SETUP would have the forms and stuff to find out what the user wants to install, OK the license agreement, yada, yada, yada, ... Your SETUP would also have to call into the Win32 Multimedia API to play the sound file you include with the SETUP package. Whn you have all of the setup options, you would launch the .MSI installation using the appropriate command line parameters to launch a silent and unattended install.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
hello
if newline (\n) coding is vbclrf
then a tab between word (\t) coding is.......
can i know the answer please
thank you in advance
Gary
|
|
|
|
|
For the tab and newline characters, in VB.NET you can use the ControlChar constant:
ControlChar.NewLine ' Generates a newline.
ControlChar.Tab ' Generates a tab.
Hope this helps. Best of luck in your programming efforts! 
Happy Programming and God Bless!
"Your coding practices might be buggy, but your code is always right."
Internet::WWW::CodeProject::bneacetp
|
|
|
|
|
hello
how to use this controlchar.newline & controlchar.tab?
a small example
i wish to print the example like below
Name Age
Gary 18
i wish to print or show this sample of result in textbox
may i know how it could be done?
thank you
Gary
|
|
|
|
|
The TextBox's are not real good at tabs. Your best bet is to change the font of the TextBox you want to show this data in to a fixed width font, like Lucida Console or New Time Roman. This will make every character the exact same width, including tabs and spaces. Then, when you go to output the data:
Dim outText As String
outText = "Name" & ControlChars.Tab & "Age" & ControlChars.NewLine
outText = outText & "Gary" & ControlChars.Tab & "18" & ControlChars.NewLine
TextBox1.Text = outText
This, of course, assumes that you have a TextBox on your form called TextBox1 and that it is setup as a MultiLine textbox.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Helo, anyone know how to display the "Select Expert" button in the CrystalReportViewer? The button is come from Crystal Report, but I want it to display on runtime in the Crystal Report Viewer....
How to see what version of the crystal report that come with
Microsoft Visual Studio.NET?
Any idea?
Thanks....
Special thanks to Dave Kreskowiak.
Learning .NET
|
|
|
|
|
I'm by no means an expert on Crystal Reports, but from what I've seen in the documentation for the version that comes with Visual Studio, I don't think you can show it. I haven't been able to find any method or property in the entire class library that can do what you want, nor have I found any method of hooking the viewer to add the functionality yourself.
The version that comes with Visual Studio is a custom version, based on the release 8.0 of CrystalReports, and was specifically built for bundling with Visual Studio.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
First of all, I need to thank you for this short period of time. You really help me doing things.
Let's say I adding components "crystl32.ocx" from the latest version to the VS.Net, does it display it?
Learning .NET
|
|
|
|
|
I have no idea because I don't use Crystal Reports. But I don't think so...
You'll just have to try it to see what what kind of interface elements it exposes to you.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Is there any way to manually dispose of an object using Windows API?
|
|
|
|
|
Manually dispose of a managed (.NET Framework) object using the Windows API? No, you can't. This must be done by the CLR Garbage Collector otherwise you'll corrupt the CLR runtime and crash it.
What's wrong with the .Dispose() method?
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Thanks.
Dave Kreskowiak wrote:
What's wrong with the .Dispose() method?
I was using a System.Resources.ResourceSet object for a large resource file, and when I called it's .Dispose() or it's .Close() method, it wouldn't free the memory used by it, even after GC.Collect() on then next line. I finally figured out to assign the value Nothing to it, which freed the memory used by it.
Kyle
|
|
|
|
|
Kyle Edwards wrote:
even after GC.Collect() on then next line
Don't call the GC Collect method unless you specifically know what you doing and why. When the GC Collects, it has to wait for ALL threads running under the .NET Framework to pause. This CAN take a LOOOOOOONG time to do. Only when all the threads are paused can the GC safely do it's job. When it's done, all the threads are resumed.
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
 Newbie question:
Is there a utility to do this? Can it be done with VB.NET 2003 somehow? I'd like to be able to use pieces of C# sample code, but don't know enough about the differences to use C#.
There seems to be a lot more sample code available for C# than VB.NET.
|
|
|
|
|
I found one. Seems to do okay...better than I could do, that's for sure.
FYI, it's a commonly linked page that converts/translates right online, and the page is, of course, written in ASPX - WOOHOO!
Here's the link: http://authors.aspalliance.com/aldotnet/examples/translate.aspx
You just paste your C# code into the text field and it converts.
WARNING: Don't insert sensitive or proprietary source code!
|
|
|
|
|
What does it do if you use an unsafe block to access pointers directly ? Just curious.
Christian
I have drunk the cool-aid and found it wan and bitter. - Chris Maunder
|
|
|
|
|
i want to find a function takes the mouse for a specific x and y position and click on it
for example if i want to click on the volume icon on the task bar without move the mouse i will order it by the program and i know the x and y position of the volume icon and i will give it to the program and ask it to click or double click
Lost & Forgotten
|
|
|
|
|
You'd have to P/Invoke the PostMessage function to HWND_BROADCAST the WM_LBUTTONDOWN and MW_LBUTTONUP mouse messages to all top level windows. The wParam of the messages must specifiy which mouse button(s) are involved and the lParam of the messages must contain the coordinates of the mouse click. The low order word is the X Coordinate and the high order word is the Y Coordinate.
WM_LBUTTONDOWN message[^]
PostMessage function[^]
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hello All,
I need to compare cells in excel to determine if a combination of three numbers appears within another combination of five numbers (each number is in its seperate cell). I think the code that I have written is partially working, however I am having a problem storing the values of my counter.
For example lets say that these are my 5 number combos:
1 2 3 4 5
1 3 5 7 8
And these are my 3 number combos
1 2 3
2 4 5
1 3 5
Based on the above, 1 2 3 appears once, 2 4 5 appears once and 1 3 5 appears twice. In reality I will be comparing a large number of 3 number combinations compared to the 5 number combos. So far this is the code that I have. j is the row for 3 combos and r is the row for the 5 combos. f is the final value that I will get from my flags:
For j = 2 To 60
Set curCell_7 = Worksheets("Combinations").Cells(j, 9)
Set curCell_8 = Worksheets("Combinations").Cells(j, 10)
Set curCell_9 = Worksheets("Combinations").Cells(j, 11)
For r = 2 To 15
Set curCell_2 = Worksheets("Combinations").Cells(r, 2)
Set curCell_3 = Worksheets("Combinations").Cells(r, 3)
Set curCell_4 = Worksheets("Combinations").Cells(r, 4)
Set curCell_5 = Worksheets("Combinations").Cells(r, 5)
Set curCell_6 = Worksheets("Combinations").Cells(r, 6)
If curCell_7.Value = curCell_2.Value Then
a = 1
ElseIf curCell_7.Value = curCell_3.Value Then
b = 1
ElseIf curCell_7.Value = curCell_4.Value Then
c = 1
ElseIf curCell_7.Value = curCell_5.Value Then
d = 1
ElseIf curCell_7.Value = curCell_6.Value Then
e = 1
End If
' If f equals to 1 then store f to final sum
f = (a + b + c + d + e) / 3
Worksheets("Combinations").Cells(j, 12) = f
Next r
Next j
The problem I am having is storing the value of f. I am sure that this is a simple one but I do not typically code in VB so I am a little unsure of how to store this value and could not determine it from what I read on the internet. Can anyone help me with this? Thanks.
John Breen
|
|
|
|
|
jbreen7 wrote:
The problem I am having is storing the value of f. I am sure that this is a simple one but I do not typically code in VB so I am a little unsure of how to store this value
What kind of problem? What do you mean by "unsure of how to store this value"?
Usually, you'd do something like this:
Worksheets("Combinations)".Cells(j, 12).Value = f
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
|
Hi
I want to disable any pop up menu that appears when the right button is clicked whenever my program is running..in any application, since each app has its own pop up menu..
vb6 please
|
|
|
|
|
Not going to happen unless to write a system wide mouse hook that captures the right mouse button and does not pass it on to the rest of the system. Also, writing hooks like this is not easily done in VB6.
There's an example of hooking in VB6 here[^].
This is also a BAD idea. Why would you want to kill the context menu is every app? I can't imagine a single purpose...
RageInTheMachine9532
"...a pungent, ghastly, stinky piece of cheese!" -- The Roaming Gnome
|
|
|
|
General 
News 
Suggestion 
Question 
Bug 
Answer 
Joke 
Praise 
Rant 
Admin 
Submit an article or tip
