Visual Basic

9-Apr-08 16:46

my question is ragard once user enter their password..the datetimepicker will automatically store into database..

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLogin.Click<br />
<br />
Dim Emp_IDDataRow As DataRow<br />
Emp_IDDataRow = Comdataset.EMPLOYEE_DETAIL.FindByEmp_ID(txtID.Text)<br />
<br />
If Emp_IDDataRow IsNot Nothing Then<br />
If txtPass.Text = Emp_IDDataRow!Password.ToString Then<br />
MessageBox.Show("Login Successful!", "infor", MessageBoxButtons.OK, MessageBoxIcon.Information)<br />
With Me<br />
if txtPass.text=true then<br />
.LOGIN_OUTTableAdapter.InsertQueryEmp(.Login_DateDateTimePicker.Value)<br />
.LOGIN_OUTTableAdapter.Fill(.Definition_dbDataSet._LOGIN_OUT)<br />
Else<br />
(part below for logout)<br />
.LOGIN_OUTTableAdapter.InsertQueryEmp(.Login_DateDateTimePicker.Value)<br />
.LOGIN_OUTTableAdapter.Fill(.Definition_dbDataSet._LOGIN_OUT) <br />
End If<br />
End With<br />
Form2.Show()<br />
Else<br />
MessageBox.Show("Invalid Password!", "Error", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error)<br />
End If<br />
Else<br />
MessageBox.Show("Invalid ID", "ERROR", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error)<br />
End If

this maybe can show more..thanks
error given me was
Error 2 Argument not specified for parameter 'Emp_ID' of
'Public Overridable Overloads Function InsertQueryEmp(Log_No As String, Emp_ID As String)

modified on Wednesday, April 9, 2008 10:52 PM

Christian Graus9-Apr-08 17:35

9-Apr-08 17:35

Member 4442916 wrote:
Error 2 Argument not specified for parameter 'Emp_ID' of
'Public Overridable Overloads Function InsertQueryEmp(Log_No As String, Emp_ID As String)

you can't work this out ?

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 )

Member 44429169-Apr-08 18:10

9-Apr-08 18:10

ya...can't work i also donot know to do correct it

my sql
INSERT INTO `LOGIN/OUT` (`Log_No`, `LogIn_time`, `Login_Date`, `Emp_ID`) VALUES (?, dd-MM-yyyy, HH:mm:ss, ?) i'm not sure wheater correct...

and i change my code like this below..but stil can't work

Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLogin.Click<br />
 Dim Emp_IDDataRow As DataRow<br />
        Comdataset = Com.getCOMDataset<br />
<br />
 Emp_IDDataRow = Comdataset.EMPLOYEE_DETAIL.FindByEmp_ID(txtID.Text)<br />
        With Me<br />
            If Emp_IDDataRow IsNot Nothing Then<br />
                If txtPass.Text = Emp_IDDataRow!Password.ToString Then<br />
                    MessageBox.Show("Login Successful!", "infor", MessageBoxButtons.OK, MessageBoxIcon.Information)<br />
                    .LOGIN_OUTTableAdapter.InsertQueryEmp("ddmmyy,hhmmss", .Login_DateDateTimePicker.Value)<br />
                    .LOGIN_OUTTableAdapter.Fill(.Definition_dbDataSet._LOGIN_OUT)<br />
                Else<br />
                    .LOGIN_OUTTableAdapter.InsertQueryEmp("ddmmyy,hhmmss", .Login_DateDateTimePicker.Value)<br />
                    .LOGIN_OUTTableAdapter.Fill(.Definition_dbDataSet._LOGIN_OUT)<br />
                    Form2.Show()<br />
                End If<br />
            ElseIf Emp_IDDataRow IsNot Nothing Then<br />
                MessageBox.Show("Invalid Password!", "Error", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error)<br />
            ElseIf Emp_IDDataRow IsNot Nothing Then<br />
                MessageBox.Show("Invalid ID", "ERROR", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error)<br />
            End If<br />
        End With

error given was Syntax error (missing operator) in query expression 'HH:mm:ss'.

can anyone help me out..thanks in advanced

Christian Graus9-Apr-08 19:32

9-Apr-08 19:32

"'Public Overridable Overloads Function InsertQueryEmp(Log_No As String, Emp_ID As String) "

There is no room for a date/time to be passed in here. You insert a log no and an emp id. You seem to me to be inserting neither. You seem, in fact, to be trying to make this up as you go.

Member 4442916 wrote:
INSERT INTO `LOGIN/OUT` (`Log_No`, `LogIn_time`, `Login_Date`, `Emp_ID`) VALUES (?, dd-MM-yyyy, HH:mm:ss, ?) i'm not sure wheater correct...

This is just a disaster. I am assuming the ? is for a parameterised query, but the dd-MM-yyyy stuff is very, very wrong. Where do you expect those values to come from ?

Member 44429169-Apr-08 19:52

9-Apr-08 19:52

my question is once i enter ID and pasdate and time will automatically store into database
then how to i suppose to change that once i enter my password and ID the time and date will store in database on the spot...can help correct for me..thanks
which mean i only need

INSERT INTO `LOGIN/OUT` (`LogIn_time`, `Login_Date`) VALUES (ddmmyyyy, HHmmss) can i do like that..

Christian Graus9-Apr-08 19:56

Re: help..urgent ..insert time to database [modified]

9-Apr-08 19:56

What sort of database is this ? SQL Server has methods you can call to store the current time and date. ddmmyyy is not it, I am sure.

You are storing the time/date of login, but not who logged in ?

Member 44429169-Apr-08 20:05

9-Apr-08 20:05

how to i suppose correct it..?can teach some and correct my error...thanks..i realy appreciate yours' help

modified on Thursday, April 10, 2008 2:15 AM

Christian Graus9-Apr-08 20:45

Re: help..urgent ..insert time to database [modified]

9-Apr-08 20:45

I'm sorry but you haven't made a simple error, you seem just to have no idea what you're doing. Are you being paid for this code ? I'm assuming you're working on code that someone else wrote. If my previous answer doesn't help ( replace that ddmyyy stuff with a function call in a stored proc to get the current date/time, I really don't know where to begin in unravelling this mess for you.

Member 44429169-Apr-08 21:15

9-Apr-08 21:15

nop...this my assignment...coding i do myself..i get the query idea from update..i think is that similar..so i use update idea change to insert...actually how to function call in a stored proc to get the current date/time..can give some example..thanks

if i do another way it give me error also

Dim adpLogin As OleDbDataAdapter<br />
        Dim oleCommand As New OleDbCommand<br />
        Try<br />
            adpLogin = New OleDbDataAdapter<br />
            conDatabase.Open()<br />
            oleCommand.CommandText = "INSERT INTO [LOGIN] (Login_No, Login_Date, Login_Time, Staff_ID) " & _<br />
            "VALUES ('" & Format(Date.Today, "ddMMyyyy").ToString & Format(Date.Now, "HHmmss").ToString & _<br />
	    "', #" & Format(Date.Today, "dd/MM/yyyy") & "#, #" & Format(Date.Now, "H:mm:ss") & _<br />
	    "#, '" & txtUserID.Text.ToUpper() & "')"<br />
<br />
            oleCommand.Connection = conDatabase<br />
            adpLogin.InsertCommand = oleCommand<br />
            adpLogin.InsertCommand.ExecuteNonQuery()<br />
        Finally<br />
            conDatabase.Close()<br />
        End Try

the error is about condatabase.open

modified on Thursday, April 10, 2008 3:36 AM

Christian Graus9-Apr-08 22:19

Re: help..urgent ..insert time to database [modified]

9-Apr-08 22:19

You should store dates using hte date data type, not as a string.

That's not your core issue. Your core issue is that you're guessing, you should start with a book or online article that explains how this stuff works.

Member 44429169-Apr-08 22:36

9-Apr-08 22:36

ok..i will do it as what you say...if were you..how do you write code..that can allow user once enter the password and ID..the time and date will automatically store in to database. give some format or ideas or coding me refer..i really appreciate it..

modified on Thursday, April 10, 2008 5:16 AM

Christian Graus10-Apr-08 0:05

10-Apr-08 0:05

I'd always use a stored proc, and when the username/password are passed in to check, if they match, I'd return a 1 to say login was successful and then use getdate() to store the current date and time.

Member 444291610-Apr-08 3:38

10-Apr-08 3:38

can show the codes...bcs i just start my college...really lots of thing i donot know...if kinds can show codes let me refer...what is getdate() isit a function?thanks

Christian Graus10-Apr-08 12:54

Re: MessageBox stuck in loop

10-Apr-08 12:54

getdate() is a function inside SQL Server that returns the current date/time on the server.

MessageBox stuck in loop

Joe DiNatale9-Apr-08 16:05

Joe DiNatale

9-Apr-08 16:05

I have a search dialog form with a text box where the user enters the search terms and a button which executes the search. The text box traps the keyup event so that the user can just press enter and initiate the search instead of clicking on the button. When the search does not return any results, a message box pops up informing the user. The problem is that if the user clears the message box by pressing enter instead of clicking the OK button, the text box gets the keyup event again, performs the search again, puts up the message box... I was able to avoid this by disabling the textbox before showing the message box and then reenabling it after but this moves the focus to the next control. Moving the focus back to the text box (in code) causes the same behavior. Does anyone know of another way to fix this?

Joe

Johan Hakkesteegt9-Apr-08 20:09

Johan Hakkesteegt

9-Apr-08 20:09

Try to use the textbox's KeyPress event instead of KeyUp:

<br />
Private Sub TextBox1_KeyPress(ByVal sender As Object, ByVal e As System.EventArgs) Handles TxtFileName_DEV.KeyPress<br />
If e.KeyChar = Chr(13) Then<br />
If TextBox1.Text = "" then<br />
'Just jump out of the sub so your code does not try to search for nothing<br />
exit sub<br />
End If<br />
'Reaction when the enter key gets pressed<br />
End If<br />
End Sub

My advice is free, and you may get what you paid for.

Re: MessageBox stuck in loop

Joe DiNatale10-Apr-08 4:58

Joe DiNatale

10-Apr-08 4:58

Perfect! That did the trick.

Thank you very much,
Joe

Trying to transfer data with filters.

Dirtyd9-Apr-08 15:53

Dirtyd

9-Apr-08 15:53

I have a data logging program already set up that takes data from a serial connection and saves it to a excel file, but now what I need help with is taking the specific data from the one file and insert it into another while using calculations so the numbers will fill one column until a predifined number is reached then auto fill to the next column and so on and so on until it has to transfer to another sheet then continue the same process. Wow that does sound like alot to ask for so any little bit of that would be great in getting me started.

Dave Kreskowiak10-Apr-08 3:28

Dave Kreskowiak

10-Apr-08 3:28

Why are you using an Excel file for this?? This sounds like you should be using a database. Managing the column use and figuring out when to start a new sheet is going to be a pain that you don't need to put up with if you just used the appropriate data store. You can then export what you need from the data to an Excel sheet whenever you need.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007, 2008

Dirtyd21-Apr-08 2:34

Dirtyd

21-Apr-08 2:34

Let me start with a brief explanation of what this is for. My company builds concrete water tanks and in this process we prestress the tank with wire pulled to 3000lbs of tension we then put this info into an excel sheet that tells hows how much wire would be required in the next layer. It is critical that a certain number is obtained in prestress to achieve the strength required for our tanks. I am using this approach because the load cell that is taking the reading transmitts in ascii and I have found an excel program for communicating and retrieving the data. I have to then put it back into another excel sheet that takes those numbers and calculates the total number of wires needed in the next layer. I understand that this is a major undertaking and that is why I have turned to this site for help.

Dave Kreskowiak21-Apr-08 3:45

Dave Kreskowiak

21-Apr-08 3:45

OK. If you're not very familiar with Excel, learn - now. In order to pull this off, you're going to need knowledge of Excel's object model. You can get the overview of the objeect model here[^]. Microsoft's Developer Center for the Visual Studio Tools for Office is here[^].

A guide to posting questions on CodeProject[^]

Dave Kreskowiak
Microsoft MVP
Visual Developer - Visual Basic
2006, 2007, 2008