title: Date to string conversion
body: <pre><code>Dim data1 As String
  Dim conn1 As SqlConnection
  Dim cmd1 As New SqlCommand
  Dim ada1 As New SqlDataAdapter()
  Dim ds1 As New DataSet
  
  data1 = lbldmdate.Text.ToString()
  conn1 = New SqlConnection("Persist Security Info=false;User Id=justin;Data Source=ARULJUSTIN\SQLEXPRESS;Initial Catalog=firemaintain;Integrated Security=True;Pooling=False")
  conn1.Open()
  ada1 = New SqlDataAdapter("select Recordno, uhnumber,uhbuilding,uhlocation from hydrantmaintain WHERE unndate= '" &amp; Today.ToString("dd/mm/yyyy") &amp; "'", conn)
  
  ada1.Fill(ds1)
  dgnxtmdates.DataSource = ds1.Tables(0)
  </code></pre>
  
  <p>I am getting an error: "cannot convert from date to string"</p>