|
without seeing the code or knowing the context, it is difficult to give a good answer, but I would suggest that you throw out the variable to a FUNCTION.
Function FunctionName(Prefix As String) As String
Do something here to generate/define/call the variable
End Function
You can call the fuction from the other module
Hope that helps
------------------------------------
"I want you to imagine I have a blaster in my hand" - Zaphod Beeblebrox.
"You DO have a blaster in your hand" - Freighter Pilot
"Yeah, so you don't have to tax your imagination too hard" - Zaphod Beeblebrox
|
|
|
|
|
Hi ,
Does any body know what %%Email%% means in this particular code.
Dim msg As New MailMessage
msg.To.Add("%%Email%%")
msg.Subject = GetSubject(emailAlertTypeID)
msg.PlainMessage.Body = TemplateBody
msg.From.Name = EmailFromName
msg.From.EMail = EmailFromEmail
msg.ReplyTo.EMail = EmailReplyToEmail
msg.ReturnPath.EMail = EmailReturnPathEmail
Because, it is not taking emails from stored procedure And how can I declare to get emails.
|
|
|
|
|
It doesn't mean anything at all.
Yous should substitute the string with a string containing the email address that you want to use.
Despite everything, the person most likely to be fooling you next is yourself.
|
|
|
|
|
Is it possible to do the following and if so how?
1) assign variable a range ie: Range = "A1"
2) perform calculations with the variable
ie: NewRange = Range + 1 answer = B1
|
|
|
|
|
NO , You cannot Calculate a String
Vuyiswa Maseko,
Sorrow is Better than Laughter, it may Sadden your Face, but It sharpens your Understanding
VB.NET/SQL7/2000/2005
http://vuyiswamb.007ihost.com
http://Ecadre.007ihost.com
vuyiswam@tshwane.gov.za
|
|
|
|
|
if the format of your range remains the same, you can get the 'A' out and add one to its ASCII value and then change it back to 'B'. But I am not sure if it helps.
|
|
|
|
|
I am assuming this is XL.
You would do it like this...
Range("A1").Select
Offset(0,1).Select
Of course the (0,1) could be reassigned as variables and called within the Offset method.
That way you do the calculation then apply to the Offset and move around like that.
Hope that helps.
------------------------------------
"I want you to imagine I have a blaster in my hand" - Zaphod Beeblebrox.
"You DO have a blaster in your hand" - Freighter Pilot
"Yeah, so you don't have to tax your imagination too hard" - Zaphod Beeblebrox
|
|
|
|
|
I would like to know how many bytes are sent/received by my application which is using TCP/IP.
There are Windows Counters which let you know the total amount of data sent/received by RAS or LAN adapters but I didn't find code to know what my process is sending (execpt for some professional and expensive tools which monitors everything and are third party software).
I cannot just count my bytes because TCP/IP overhead is also present and I want to include that too in my statistics.
Thank you.
|
|
|
|
|
I have several usercontrols that inherit from an other control.
I need to be able to set a property for all these (and other) controls.
But I don't really want to be writing a select case for all these controls, is there any way to know the type of the 'base' control?
|
|
|
|
|
I have some extended controls (tabcontrols, textboxes, etc).
I use checks like:
For Each oControl As Control In fraOffsets.Controls
With oControl
If TypeOf oControl Is TextBox Then
'Do work here....
End If
End With
Next
All textboxes on this frame are extended, but pass because they are all of type textbox. If your talking about a composite control, I don't know - other than you might set a property to designate it (like Tag or create one).
Did either of these suggestions work for you TDDragon?
modified on Friday, July 25, 2008 2:48 PM
|
|
|
|
|
I'm looking for any advice on what is a good barcode scanning device that is easy to use with VB2005. I'm thinking of developing an application that would read a Fed Ex barcode and update one of our internal systems with the tracking number. Thank you.
|
|
|
|
|
AFAIK most barcode scanners act as a second keyboard, that is they emit text as
if it was typed. With often the option to prefix and append two selectable literal strings,
so you can differentiate a scan result from simple typing.
|
|
|
|
|
I have code like
Dim subject As String = "Test EmbeddedImage"
Dim contentId As String = "image1"
Dim body As String = "Here is a picture of CRM:
Dim av1 As AlternateView = AlternateView.CreateAlternateViewFromString(body, Nothing, "Text/Html")
Dim linkedResource1 As LinkedResource = New LinkedResource(ms,?????)
linkedResource1.ContentId = contentId
av1.LinkedResources.Add(linkedResource1)
.
.
other code for sending mail
.
.
What should I write at ????
for sending mail with image ?
|
|
|
|
|
please read carefully ...
I have a Picture box on the form ...
and I want to send that image with mail which appears in pictute box
Now I have a code that takes the image from folder structure
like c:\temp\aaa.jpg
It sends image with mail PERFECTLY....
but now I have to send mail which is store in memory stream .
not in file...
I have code
like
How can I send the image wich stored in memory stream ???
I have code
like
Public sub senmail(ByVal image1 as Image)
Dim subject As String = "Test EmbeddedImage"
Dim contentId As String = "image1"
Dim body As String = "Here is a picture of CRM:
Dim ClientPC As New SmtpClient("ddd.com", 25)
Dim Authentication As New Net.NetworkCredential("nmy@myserver.com", "password")
ClientPC.Credentials = Authentication
Dim mSender As New MailAddress("nmy@myserver.com")
Dim mReceiver As New MailAddress("nmy@myserver.com")
Dim sMail As New MailMessage(mSender, mReceiver)
sMail.Subject = "Testing embedded image 25 july 3.41 PM"
Dim av1 As AlternateView = AlternateView.CreateAlternateViewFromString(body, Nothing, MediaTypeNames.Text.Html)
Dim ct, ct1 As New ContentType
Dim ct2 As New ContentType("image")
ct.MediaType = MediaTypeNames.Image.Jpeg
Dim linkedResource1 As LinkedResource = New LinkedResource(ms, ct.MediaType) <----- gives error here
linkedResource1.ContentId = contentId
av1.LinkedResources.Add(linkedResource1)
sMail.AlternateViews.Add(av1)
sMail.IsBodyHtml = True
ClientPC.Send(sMail)
end sub
|
|
|
|
|
nileshbahirshet wrote: Dim ct, ct1 As New ContentType
Try this instead:
Dim ct As New ContentType
Dim ct1 As New ContentType
IIRC, your way of definition means that ct is untyped in VB...
|
|
|
|
|
I'll try to explain :
look this example :
Module
Module1
Sub Main()
Dim num AsDouble = 1.25
Console.WriteLine(Math.Round(num, 1, MidpointRounding.AwayFromZero))
num = 1.225
Console.WriteLine(Math.Round(num, 2, MidpointRounding.AwayFromZero))
num = 1.2225
Console.WriteLine(Math.Round(num, 3, MidpointRounding.AwayFromZero))
num = 1.22225
Console.WriteLine(Math.Round(num, 4, MidpointRounding.AwayFromZero))
num = 1.222225
Console.WriteLine(Math.Round(num, 5, MidpointRounding.AwayFromZero))
num = 1.2222225
Console.WriteLine(Math.Round(num, 6, MidpointRounding.AwayFromZero))
EndSub
End
Module
The output of this sample console application is :
1,3
1,23
1,223
1,2223
1,22222
1,222223
Is there something wrong ?
In my application I must use five decimal digits and this round method.
Regards
Andrea
|
|
|
|
|
No, there isn't anything wrong with the Round method. The problem is your expectations on the double data type.
You think that you are putting the exact value 1.222225 in the variable, but that number (as most numbers) can not be exactly represented as a double . What you are actually putting in the variable is something very close to that value, something like 1.22222499999834 , which does of course round to 1.22222 .
Despite everything, the person most likely to be fooling you next is yourself.
|
|
|
|
|
Guffa wrote: You think that you are putting the exact value 1.222225 in the variable, but that number (as most numbers) can not be exactly represented as a double. What you are actually putting in the variable is something very close to that value, something like 1.22222499999834, which does of course round to 1.22222.
Is there any function to increase a double by the smallest possible non-zero amount? I would expect one could do something like:
Function BumpDouble(ByVal Num As Double) As Double
Dim Delta, NewVal As Double
Delta = Num / 36028797018963968 ' (2^55)
If Delta <> 0 Then
Do
NewVal = Num+Delta
Delta *= 2
Loop While Num = NewVal
Else
' Need special handling for really really small numbers
End If
Return NewVal
End Function
But that seems a bit hokey.
|
|
|
|
|
Rather than try to compute Delta , use Double.Epsilon instead - then you could just do Num + Delta .
|
|
|
|
|
Stuart Dootson wrote: Rather than try to compute Delta, use Double.Epsilon instead - then you could just do Num + Delta.
The smallest delta value for a given number will only equal Double.Epsilon if the number is very close to zero. In practice, it will always be equal to either the number divided by a particular power of two, or (if that division yields zero) Double.Epsilon; any assumption about the power of two in question, however, may break portability if future machines support higher-precision numerics.
|
|
|
|
|
You could try using the DECIMAL type instead of DOUBLE. It is much more accurate, however, a bit slower in use. This should get rid of most of these errors as explained by Guffa
|
|
|
|
|
It looks to me liek the round function is working correctly
for example for three decimal places
1.2225
since the last digit is 5 the number is rounded up to 1.223
my understanding of round is that a number is rounded down if the digits past the rounding point is 00 <= digits < 50
and rounded up if the digits past the rounding point is 50 <= digits < 100
Steve
|
|
|
|
|
You are missing the point. Notice the value 1,22222 that seems to be rounded differently from the others.
Despite everything, the person most likely to be fooling you next is yourself.
|
|
|
|
|
Yeah actually single(float) and double are working the same way, it's not precise, because it's floating-point numbers representation. So it's a lot better and precise to use fixed-point number representation = Decimal in .Net
-- Everything is possible, even the impossible! ^_^
|
|
|
|
|
Use integer math with normalized integers and there is no problem.
Added bonus - it's a gazillion time faster than floating point math.
Divide by 10^5 before displaying to humans.
CICCIOLO69 wrote: In my application I must use five decimal digits and this round method.
Teacher evidently wants you to think a little, knowing the problem exists.
Gary
|
|
|
|