Visual Basic

SilentBob101 wrote:

In my app it shows like it should, but not in the database.

<br />
OleDbCommand.Parameters("LogDate").Value = System.DateTime.Now.ToString("dd/MM/yyyy HH:mm:ss")

<br />
OleDbCommand.Parameters("LogDate").Value = System.DateTime.Now.ToString("dd/MM/yyyy HH:mm:ss")

<br />
OleDbCommand.Parameters("LogDate").Value = System.DateTime.Now

alexfromto wrote:

The problem is that each customer presents its own format so I guess I have to build different parsers for each customer.

Did anyone have any experience with this?

alexfromto wrote:

Any help with where and how I should start?

NigeLost wrote:

although it looks like someone has erased it on the board

NigeLost wrote:

What your note says makes sense but how do I get a copy of the global variables into the Child form if I don't get this from the global variables themselves?

Interestingly, the TitleBar gets the correct info each time using

Me.Text = MAIN.wsName

which refers to the Public variable held in the top of the MAIN Form.

Public Class MyForm2
    Public HeaderText As String
    Public Data() As Integer
    .
    . Your remaining form code...
    .
End Class

Dim newChildForm As New MyForm2
newChildForm.HeaderText = "Some text..."
newChildForm.Data = SomeArray()
.
. Finish creating your child form as normal...
.

'before placing this code, make sure you have imported system.data.oledb

public function IsLoginValid(byval ConStr as string, byval UName as string, byval Password as string) as boolean
   dim c as new oledbconnection(ConStr)
   dim cmd as oledbcommand=c.createcommand
   dim da as new oledbdataadapter(cmd)
   dim dr as oledbdatareader
   with cmd
      .commandtext="select pwd from customerdetails where uname='" & _ 
      uname.trim & "'"
      try
         dr=.executereader
      catch x as exception
         messagebox.show("Cant connect to database.")
      finally
         c.close
      end try
   end with
   if dr.hasrows then
      dr.read
      if cstr(dr("pwd")).trim=password.trim then
         return true
      else
         return false
      end if
   else
      return false
   end if
end function