|
|
Ksuyong wrote: Urgent Question
Every question is important from each one's perspective. Truly urgent questions which need priority and dedicated attention should be diverted to a paid technical support. Discussion forums are intended as a support channel from volunteer experts on their own effort and time and there is no way preempting a support to one query in preference to other is entertained whatsoever.
Vasudevan Deepak Kumar
Personal Homepage Tech Gossips
A pessimist sees only the dark side of the clouds, and mopes; a philosopher sees both sides, and shrugs; an optimist doesn't see the clouds at all - he's walking on them. --Leonard Louis Levinson
|
|
|
|
|
Very Sorry.
modified on Monday, May 19, 2008 8:37 AM
|
|
|
|
|
Ksuyong wrote: The only thing I wanted to do is solving the problem as soon as possible, so I named the title of my question "Urgent Question".
Please don't do this. It only irritates people and makes them less likely to help you.
|
|
|
|
|
Dear Colin.
Thank you for your advice.
I'm very sorry, so I change my first reply message.
And if it doesn't matter for you, can you help me?
Hope your reply.
Best regards.
|
|
|
|
|
like 15/1/2008 and 30/1/2008 = 15 day
Pleaaaaaaaaase
Ahmed El-Badry
|
|
|
|
|
|
This is not what I mean
I mean Full date like
8/27/2008 - 5/19/2008 = 100 Day
thnx :S
Ahmed El-Badry
|
|
|
|
|
You've already been given the answer. Hell, you were given the exact code you needed to pull this off, twice. If you can't understand what the single line of code was, then you've got to ask a different question explaining that.
|
|
|
|
|
...and I gave you the answer but you don't seem to get it.
You asked this question before, got the answer before and didn't get it either. So maybe you should forget about it and do something different?
But hell, I am in good mood today so once again:
dim date1 as date = 8/27/2008<br />
dim date2 as date = 5/19/2008<br />
dim DiffDays as integer<br />
DiffDays = date1.day-date2.day<br />
"I love deadlines. I like the whooshing sound they make as they fly by." (DNA)
|
|
|
|
|
Smithers-Jones wrote: do something different
He is poor in understanding things. You should help him understand this in more depth and with clarity.
Vasudevan Deepak Kumar
Personal Homepage Tech Gossips
A pessimist sees only the dark side of the clouds, and mopes; a philosopher sees both sides, and shrugs; an optimist doesn't see the clouds at all - he's walking on them. --Leonard Louis Levinson
|
|
|
|
|
Msge.Visible = True
Dim date1 As Date = "8/27/2008"
Dim date2 As Date = "5/19/2008"
Dim DiffDays As Integer
DiffDays = date1.Day - date2.Day
Msge.Text = DiffDays
Who got the output of this code is No. 8 days ,This is not true
The difference between the dates is 100 days ,This is what i mean
Thank you for Help
Ahmed El-Badry
|
|
|
|
|
Msge.Visible = True
Dim date1 As Date = "8/27/2008"
Dim date2 As Date = "5/19/2008"
Dim DiffDays As Integer
DiffDays = date1.Day - date2.Day
Msge.Text = DiffDays
Who got the output of this code is No. 8 days ,This is not true
The difference between the dates is 100 days ,This is what i mean
Thank you for Help
Ahmed El-Badry
|
|
|
|
|
I used Visual Basic.Net in VS 2003
Ahmed El-Badry
|
|
|
|
|
Msge.Visible = True
Dim date1 As Date = "8/27/2008"
Dim date2 As Date = "5/19/2008"
Dim DiffDays As Integer
Dim Diffmonth As Integer
Dim Diffyear As Integer
DiffDays = date1.Day - date2.Day
Diffmonth = date1.Month - date2.Month
Diffyear = date1.Year - date2.Year
Msge.Text = DiffDays.ToString + " " + Diffmonth.ToString + " " + Diffyear.ToString
outing 8 days 3 month 0 year
i want convert this to days = 100 days
Ahmed El-Badry
|
|
|
|
|
Ahmed El-Badry wrote: Msge.Visible = True
Dim date1 As Date = "8/27/2008"
Dim date2 As Date = "5/19/2008"
Dim DiffDays As Integer
DiffDays = date1.Day - date2.Day
Msge.Text = DiffDays
Who got the output of this code is No. 8 days ,This is not true
The difference between the dates is 100 days ,This is what i mean
Right you are, sorry, my fault.
Use this code:
Dim date1 As Date
Dim date2 As Date
date1 = "19.5.2008"
date2 = "27.8.2008"
Dim Diff As TimeSpan = date2.Subtract(date1)
MsgBox(Diff.Days)
but still: you asked this question before (more than a year ago).
In your CV you write, that you have fair knowlege of VB.NET. This date-stuff is very basic, usually explained in the first chapters of most beginner books.
"I love deadlines. I like the whooshing sound they make as they fly by." (DNA)
|
|
|
|
|
thnx u
Ahmed El-Badry
|
|
|
|
|
Msge.Visible = True
Dim date1 As Date = "8/27/2008"
Dim date2 As Date = "5/19/2008"
Dim DiffDays As Integer
Dim Diffmonth As Integer
Dim Diffyear As Integer
DiffDays = date1.Day - date2.Day
Diffmonth = date1.Month - date2.Month
Diffyear = date1.Year - date2.Year
Msge.Text = DiffDays.ToString + " " + Diffmonth.ToString + " " + Diffyear.ToString
outing 8 days 3 month 0 year
i want convert this to days = 100 days
Ahmed El-Badry
|
|
|
|
|
Hi,
I'm having some trouble trying to figure out a way to break up a textarea into 800 word pages. I want each page to retain its original spacing and the pages should be broken up at word boundaries so that words aren't cut up from page to page. Any suggestions would be great.
Thanks,
John
|
|
|
|
|
I guess you could count the spaces to find 800 words.
Christian Graus
Please read this if you don't understand the answer I've given you
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
hi smile.gif
i have the fellowing code for updating the database when its change in data grid
<br />
<br />
While (r < DataGridView1.Rows.Count - 1)<br />
InsertCommand1.Parameters.Clear()<br />
InsertCommand1.CommandText = "UPDATE [Section] SET Capacity =" & DataGridView1.Rows(r).Cells(2).Value & " WHERE SectionID = " & DataGridView1.Rows(r).Cells(1).Value<br />
<br />
InsertCommand1.CommandType = CommandType.Text<br />
InsertCommand1 = InsertCommand1<br />
DataAdapter1.InsertCommand = InsertCommand1<br />
InsertCommand1.ExecuteNonQuery()<br />
DataAdapter1.Update(DataSet1, "Section")<br />
r += 1<br />
End While<br />
it make the update but it give the fellowing error
Update requires a valid UpdateCommand when passed DataRow collection with modified rows.
when i but the fellowing command
Dim CmdB As New OleDb.OleDbCommandBuilder(DataAdapter1)
it give error in update statment
|
|
|
|
|
asha_s wrote: Update requires a valid UpdateCommand when passed DataRow collection with modified rows.
These built in update things suck. However, if you must use them, this error is telling you that you need to specify the update command ( the SQL that does the update )
Christian Graus
Please read this if you don't understand the answer I've given you
"also I don't think "TranslateOneToTwoBillion OneHundredAndFortySevenMillion FourHundredAndEightyThreeThousand SixHundredAndFortySeven()" is a very good choice for a function name" - SpacixOne ( offering help to someone who really needed it ) ( spaces added for the benefit of people running at < 1280x1024 )
|
|
|
|
|
Christian Graus wrote: this error is telling you that you need to specify the update command ( the SQL that does the update )
how can i specify it i am sure from the type of the sended perimeter if you have another way rather than command please tell me
|
|
|
|
|
Hi to all,
PLEASE PLEASE PLEASE HELP ME, SORRY IF MY MESSAGE IS SO LONG, BUT I COULDN'T FIND A WAY TO AT LEAST UPLOAD MY CODE FILES SO I HAD TO INSERT ALL THE CODE HERE, BUT PLEASE HELP, I'M REALLYYYYYYYYY STOCKED AND I WILL BE VERY VERY VERYYYYYYYY THANKFUL IF SOMEONE HELPS ME ............
I am reading the Microsoft's book for exam 70-310 & 70-320 and I have a problem in Chapter 4's lab which I didn't manage to solve ... please help me ...
It's a simple chat application using .NET remoting:
We have a ChatCoordinator class and a SubmitEventArgs class (saved in a file named: CChatCoordinator.vb) with the following code:
---------------------------------------------------------------------
Imports System
Imports System.Runtime.Remoting
Imports System.Collections
Serializable()> _
Public Class SubmitEventArgs
Inherits EventArgs
Private message As String = Nothing
Private userName As String = Nothing
Public Sub New(ByVal contribution As String, _
ByVal contributor As String)
Me.message = contribution
Me.userName = contributor
End Sub ' New
Public ReadOnly Property Contribution() As String
Get
Return message
End Get
End Property
Public ReadOnly Property Contributor() As String
Get
Return userName
End Get
End Property
End Class ' SubmitEventArgs
Public Delegate Sub SubmissionEventHandler(ByVal sender As Object, _
ByVal submitArgs As SubmitEventArgs)
Public Class ChatCoordinator
Inherits MarshalByRefObject
Public Sub New()
Console.WriteLine("ChatCoordinator created. Instance: " & _
Me.GetHashCode().ToString())
End Sub ' New
Public Overrides Function InitializeLifetimeService() As Object
Return Nothing
End Function ' InitializeLifetimeService
Public Event Submission As SubmissionEventHandler
Public Sub Submit(ByVal contribution As String, _
ByVal contributor As String)
Console.WriteLine("{0} says: {1}.", _
contributor, contribution)
Dim e As New SubmitEventArgs(contribution, contributor)
Console.WriteLine("Broadcasting...")
RaiseEvent Submission(Me, e)
End Sub ' Submit
End Class ' ChatCoordinator
-------------------------------------------------------------------
We have a Server class (in a file named: CServer.vb):
Imports System
Imports System.Diagnostics
Imports System.Runtime.Remoting
Imports System.Runtime.Remoting.Channels
Public Class Server
Public Shared Sub Main()
RemotingConfiguration.Configure("Central.config")
Console.WriteLine("The host application is currently " & _
"running. Press Enter to exit.")
Console.ReadLine()
End Sub ' Main
End Class ' Server
--------------------------------------------------------------------
The Central.config file, which is used by the Server class for configuration is as follows (I had to delete the beginning "<" characters to avoid interception with HTML here):
configuration>
system.runtime.remoting>
application>
service>
wellknown
mode="Singleton"
type="ChatCoordinator, ChatCoordinator"
objectUri="Chat"
/>
/service>
channels>
channel ref="http" port="8080" />
/channels>
/application>
/system.runtime.remoting>
/configuration>
--------------------------------------------------------------------
And finally, we have a ChatClient class (saved in a file named CChatClient.vb):
Imports System
Imports System.Runtime.Remoting
Imports System.Runtime.Remoting.Channels
Imports Microsoft.VisualBasic
Public Class ChatClient
Inherits MarshalByRefObject
Public Overrides Function InitializeLifetimeService() As Object
Return Nothing
End Function
Private userName As String = Nothing
Public Sub New(ByVal [alias] As String)
Me.userName = [alias]
End Sub
Public Sub Run()
RemotingConfiguration.Configure("Client.config")
Dim chatCenter As New ChatCoordinator
AddHandler chatCenter.Submission, AddressOf _
Me.SubmissionReceiver
Dim userInput As String = ""
While True
Console.WriteLine("Press 0 (zero) and ENTER to Exit:")
userInput = Console.ReadLine()
If userInput = "0" Then Exit While
chatCenter.Submit(userInput, userName)
End While
RemoveHandler chatCenter.Submission, AddressOf _
Me.SubmissionReceiver
End Sub
Public Sub SubmissionReceiver(ByVal sender As Object, _
ByVal args As SubmitEventArgs)
If args.Contributor = userName Then
Console.WriteLine("Your message was broadcast.")
Else
Console.WriteLine(args.Contributor & " says: " & _
args.Contribution)
End If
End Sub ' SubmissionReceiver
Public Shared Sub Main()
Dim args() As String = Environment.GetCommandLineArgs()
If args.Length <> 2 Then
Console.WriteLine("You need to type an alias.")
Return
End If
Dim client As New ChatClient(args(1))
client.Run()
End Sub ' Main
End Class ' ChatClient
--------------------------------------------------------------------
And the Client.config used by the Client class (Again, beginning "<" characters here are deleted intentionally):
configuration>
system.runtime.remoting>
application>
client>
wellknown
type="ChatCoordinator, ChatCoordinator"
url="http://localhost:8080/Chat"
/>
/client>
channels>
channel ref="http" port="0" />
/channels>
/application>
/system.runtime.remoting>
/configuration>
--------------------------------------------------------------------
I use the VB compiler at the Command Prompt to compile the codes:
vbc /t:library CChatCoordinator.vb<br />
vbc /r:CChatCoordinator.dll CServer.vb<br />
vbc /r:CChatCoordinator.dll CChatClient.vb
and then store CChatCoordinator.dll, Cserver.exe and Central.config in a folder named Server and store CChatCoordinator.dll, CChatClient.exe and Client.config in another folder named Client.
After that, I try to run the application:
Also it appears to me that running CChatClient.exe in the Command Prompt without running CServer.exe in another Command Prompt would generate an exception, the CChatClient.exe is executed without any errors.
Because of this, I think that the program doesn't interpret the ChatCoordinator class (in the CChatCoordinator.dll file) as a remotable object and it uses it's methods regardless of whether the CServer.exe is running or not.
Although when I run CChatClient.exe, my firewall tells me that this program wants to connect at a random port becuase of port="0" in the Client.config file, It appears to me that the Client class doesn't care what the Client.config file says; because I even tried to misspell some elements in Client.config but no error was generated.
And because of all the things that I said, when I open three diferent Command Prompt windows and type these:
1. CServer (in the Server directory)
2. CChatClient user1 (in the Client directory)
3. CChatClient user2 (in the Client directory)
and then I try to send messages from one use to the other, the messages only appear in its own user window not the other user.
For example, when I type "Hello" and press enter in user1's window, only the following appears in user1's window:
user1 says: hello.
Broadcasting...
Your message was broadcast.
and nothing appears in user2's window.
Are file names important here? For example, should the Server class be inside a file named Server.vb? Is it really important? I also tried to change the configuration file names to filename.exe.config but it also didn't solve the problem.
Please help me, I searched the articles, read MSDN, and manipulated the code many many times, but I couldn't find the problem. Please help ......
modified on Monday, May 19, 2008 4:46 AM
|
|
|
|
|
hi myself cma windows application developer in vb.net. please help me
1 how to save contents of data gried veiw into files
2 how to print contents of controls in vb.net
plese provide me comleate code using vb.net only with library
mohammed
|
|
|
|