I want to take print the lblout.text without saving .txt.
 
 
Sub InOutView()
        Dim IntDocNo As String
        Dim Str As String
        Dim olRs As SqlDataReader
        Dim cmd As New SqlCommand("Select * from Cou_inOut Where DOC_No='11'", 
Con)
        Con.Open()
        olRs = cmd.ExecuteReader(CommandBehavior.SingleRow)
        Session.LCID = 2057
        Dim Head, Docno, DocDt, Timein, Consignee, Booking, CovNo, CovDt As 
String
        If olRs.Read() Then
             Docno = olRs("DOC_NO")
            DocDt = olRs("DOC_DT")
            Timein = olRs("Time_in")
            Consignee = olRs("Consignee")
            Booking = olRs("Booking_no")
            CovNo = olRs("Cov_let_no")
            CovDt = olRs("cov_let_dt")
        End If
        lblout.Text &= "<BR>"
        lblout.Text &= "<BR>"
        lblout.Text &= "<font face=verdana size=2><B><center><U>COURIER INWARD 
DOCUMENT.</U></center></B></font>" + Environment.NewLine
        lblout.Text &= "<BR>"
        lblout.Text &= "<BR>"
        lblout.Text &= "<p align=left><font face=verdana 
size=2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Document No :  " & Docno & 
"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"
 & "<span cssclass=c1> Document Date : " & DocDt & "</Font></span></p>"
        lblout.Text &= "<BR>"
        lblout.Text &= "<p align=left><font face=verdana 
size=2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Time In :  " & Timein & 
"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"
 & " Consignees : " & Consignee & "</Font></p>"
        lblout.Text &= "<BR>"
        lblout.Text &= "<p align=left><font face=verdana 
size=2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Booking No :  " & Booking & 
"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"
 & " Letter No : " & CovNo & "</Font></p>"
        lblout.Text &= "<BR>"
        lblout.Text &= "<p align=left><font face=verdana 
size=2>&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;Letter Dt :  " & CovDt & 
"&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;"
 & " Letter No : " & CovNo & "</Font></p>"
        'End If
        Page.DataBind()
        olRs.Close()
        Con.Close()
    End Sub
please  Help me sir

                
---------------------------------
How much free photo storage do you get? Store your friends n family photos for 
FREE with Yahoo! Photos. 
 http://in.photos.yahoo.com

[Non-text portions of this message have been removed]



------------------------ Yahoo! Groups Sponsor --------------------~--> 
Most low income households are not online. Help bridge the digital divide today!
http://us.click.yahoo.com/cd_AJB/QnQLAA/TtwFAA/saFolB/TM
--------------------------------------------------------------------~-> 

 
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/
 


Reply via email to