Oops... a little bug in the ointment... there should be quotes around the column name in the first line of the If:

If drReader.IsDBNull("UserName") Then
   txtUserName.Text = ""
Else
   txtUserName.Text = CStr(drReader("UserName"))
End If

Carl.

Carl Olson, Jr.
CEO, Founder
Cerelogic, Inc.

www.cerelogic.com

"Applying rocket science to business."