พี่ๆคับ เราจะสามารถเพิ่มวันเวลายังไงอะคับไม่ให้ซ้ำกับช่องอื่น mysql code vb2010 คับ

			Dim intNumRows As Integer
			strSQL = "SELECT * FROM customer WHERE CustomerID = '"& Me.txtCustomerID.Text &"' "		
			objCmd = New MySqlCommand(strSQL, objConn)
			intNumRows = objCmd.ExecuteScalar()

			IF intNumRows > 0 Then
				Me.pnlAdd.Visible = False
				Me.lblStatus.Visible = True
				Me.lblStatus.Text = "CustomerID already exist."
			Else	

  Dim intnumrows As Integer
        Dim ff As String = "Select * from checkuser where logindate='" & now()& "' "
     
        Dim cmd As New MySqlCommand(ff, conn)
        intnumrows = cmd.ExecuteScalar()

        If intnumrows > 0 Then
            MsgBox("งง")
        Else

            Dim updatetoday As String = "Update  Checkuser set " & "Logindate='" & datetoday & "' where status = 'user' "
            '     Dim updatetoday As String = "Insert into `Checkuser`(Logindate) values ('" & now() & "')"
            Dim update As New MySqlCommand(updatetoday, conn)
            update.ExecuteNonQuery()

         
        End If
เหตุผมที่ใช้ update เพราะ ผมต้องเอาข้อมูลจากตาราง login ไปใว้ใน checkuser ด้วยคับ 
นี่ code คัดลองคับ
   Dim dd As String = " INSERT INTO `Checkuser` (Status,Username,Firstname,Lastname ) " & _
                        "SELECT Status,Username,Firstname,Lastname FROM `Login` where Status='User' "


        Dim insert As New MySqlCommand(dd, conn)
        insert.ExecuteNonQuery()

Dim dd As String = " INSERT INTO `Checkuser` (Status,Username,Firstname,Lastname )" & _
                         "SELECT Status,Username,Firstname,Lastname FROM `Login` where Status='User'  "

        Dim insert As New MySqlCommand(dd, conn)
        insert.ExecuteNonQuery()

        
        Dim updatetoday As String = "Update  Checkuser set " & "Logindate='" & Now & "' where status='user' "
        '  Dim updatetoday As String = "Insert into `Checkuser`(Logindate) values ('" & datetoday & "')"
        Dim update As New MySqlCommand(updatetoday, conn)
        update.ExecuteNonQuery()