I want to convert these into sample.txt
Please Hlp me.
Private Sub txtRegno_TextChanged(sender As Object,e As EventArgs)
Dim rs As SqlDataReader
Dim con As New SqlConnection("database=operation;uid=sa;pwd=;server=lc2000")
Dim Cmd As New SqlCommand("Vessel_View", con)
Cmd.CommandType = CommandType.StoredProcedure
With Cmd.Parameters
.Add("@xRegno", txtRegno.Text)
End With
con.Open()
rs = Cmd.ExecuteReader()
If rs.Read Then
txtRegno.Text = rs("regno")
txtVessel.Text = rs("vesselname")
txtShipper.Text = rs("Shipper")
txtConsignee.Text = rs("Consignee")
txtLoad.Text = rs("Loading_port")
txtDis.Text = rs("Discharge_port")
End If
con.Close()
rs.Close()
End Sub
---------------------------------
Too much spam in your inbox? Yahoo! Mail gives you the best spam protection
for FREE!
http://in.mail.yahoo.com
[Non-text portions of this message have been removed]
Yahoo! Groups Links
<*> To visit your group on the web, go to:
http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
<*> To unsubscribe from this group, send an email to:
[EMAIL PROTECTED]
<*> Your use of Yahoo! Groups is subject to:
http://docs.yahoo.com/info/terms/
