Re: [indoprog-vb] Mencetak Tanggal dgn Crystal Report

[aan djuhani]

Mas Cokro belum bisa tuch
  Gimana yah
   
  Listing lengkapnya sbb :
  Private Sub Command5_Click()
    If Combo1.ListIndex = 0 Then
       CrystalReport1.SelectionFormula = “{tb_gaji.NAMA}=’” & Text1.Text & “’”
       CrystalReport1.WindowState = crptMaximized
       CrystalReport1.RetrieveDataFiles
       CrystalReport1.Action = 1
    ElseIf Combo1.ListIndex = 1 Then
       CrystalReport1.SelectionFormula = “{tb_gaji.GOL}=” & Text1.Text & “ “
       CrystalReport1.WindowState = crptMaximized
       CrystalReport1.RetrieveDataFiles
       CrystalReport1.Action = 1
    ElseIf Combo1.ListIndex = 2 Then
       CrystalReport1.SelectionFormula = “{tb_gaji.JABATAN}=’” & Text1.Text & 
“’”
       CrystalReport1.WindowState = crptMaximized
       CrystalReport1.RetrieveDataFiles
       CrystalReport1.Action = 1
    Else
       CrystalReport1.SelectionFormula = “”
       CrystalReport1.WindowState = crptMaximized
       CrystalReport1.RetrieveDataFiles
       CrystalReport1.Action = 1
    End If
    
  End Sub
  

Cokro Fidian <[EMAIL PROTECTED]> wrote:
          coba ganti menjadi:
CrystalReport1.SelectionFormula =
&#8220;{tb_pegawai.tglahir}= #&#8221; & Text1.Text &
&#8220;#&#8221;

Semoga bermanfaat
Cokro

--- aan djuhani <[EMAIL PROTECTED]> wrote:

> Hi Vbers,
> Mohon bantuannya doong bagaimana mencetak Tanggal
> Lahir dgn Crystal Report, saya sdh coba dgn cara
> dibawah ini :
> Tapi ga bisa !
> 
> Private Sub Command5_Click()&#8217;Cetak
> If Combo1.ListIndex = 0 Then
> CrystalReport1.SelectionFormula =
> &#8220;{tb_pegawai.tglahir}=&#8221; 
> & Text1.Text & &#8220;&#8221;
> CrystalReport1.WindowState = crptMaximized
> CrystalReport1.RetrieveDataFiles
> CrystalReport1.Action = 1
> 
> Terima kasih sebelumnya
> Aan
> 
> 
> 
> ---------------------------------
> Yahoo! Music Unlimited - Access over 1 million
> songs.Try it free. 
> 
> [Non-text portions of this message have been
> removed]
> 
> 

Send instant messages to your online friends http://uk.messenger.yahoo.com 


         

                
---------------------------------
Want to be your own boss? Learn how on  Yahoo! Small Business. 

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



------------------------ Yahoo! Groups Sponsor --------------------~--> 
Yahoo! Groups gets a make over. See the new email design.
http://us.click.yahoo.com/XISQkA/lOaOAA/yQLSAA/zCsqlB/TM
--------------------------------------------------------------------~-> 

Untuk berhenti berlangganan kirim email kosong ke : [EMAIL PROTECTED]

Forum ini berkembang dengan pesat, jika anda memiliki
dedikasi dan waktu, silahkan mengaplikasikan diri
menjadi moderator. 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/indoprog-vb/

<*> 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/