http://blogcopy.com/~djiesoft.blogspot.com http://blogcopy.com http://blogcopy.com/int/fpix.php?bd=hp6g en-us Thu, 23 May 2013 07:42:17 +0000 http://blogcopy.com/~djiesoft.blogspot.com?copy=7j6poq Mon, 16 Apr 2012 10:09:14 +0000






Untuk meng-export data dari microsoft access ke microsoft excel, anda dapat gunakan source code berikut ini :





Click HERE To Download Source Code

Tags:

mdb to xls, export data mdb to xls, access to excel, vb6 export data, import data to excel from access, vb tutorial,]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=7j6poq http://blogcopy.com/~djiesoft.blogspot.com?copy=chsbbe Mon, 16 Apr 2012 06:01:26 +0000 http://blogcopy.com/~djiesoft.blogspot.com?copy=chsbbe http://blogcopy.com/~djiesoft.blogspot.com?copy=au8ys3 Mon, 16 Apr 2012 06:00:00 +0000 http://blogcopy.com/~djiesoft.blogspot.com?copy=au8ys3 http://blogcopy.com/~djiesoft.blogspot.com?copy=7j69s8 Mon, 16 Apr 2012 05:59:57 +0000 http://blogcopy.com/~djiesoft.blogspot.com?copy=7j69s8 http://blogcopy.com/~djiesoft.blogspot.com?copy=fsuw59 Mon, 16 Apr 2012 05:00:58 +0000
Dim RD As Odbc.OdbcDataReader = CMD.ExecuteReader

If RD.Read Then

djiePictureBox1.Image = djieGetDataToImage(RD.Item("PHOTO"))

End If

RD.Close()]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=fsuw59 http://blogcopy.com/~djiesoft.blogspot.com?copy=5vmt36 Mon, 16 Apr 2012 05:00:10 +0000
Try

Dim imgConverter As New System.Drawing.ImageConverter()

Return TryCast(imgConverter.ConvertFrom(pData), Drawing.Image)

Catch ex As Exception

MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

Return Nothing

End Try

End Function]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=5vmt36 http://blogcopy.com/~djiesoft.blogspot.com?copy=96phy1 Mon, 16 Apr 2012 04:57:34 +0000
CON.Open()




Dim ADP As New Odbc.OdbcDataAdapter("SELECT FIRSTNAME,PHOTO FROM EMPLOYEES", CON)

Dim DT As New DataTable

ADP.Fill(DT)

djieDataGridView1.DataSource = DT]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=96phy1 http://blogcopy.com/~djiesoft.blogspot.com?copy=483g9v Mon, 16 Apr 2012 04:54:56 +0000 http://blogcopy.com/~djiesoft.blogspot.com?copy=483g9v http://blogcopy.com/~djiesoft.blogspot.com?copy=e5beyg Mon, 16 Apr 2012 03:26:42 +0000 http://blogcopy.com/~djiesoft.blogspot.com?copy=e5beyg http://blogcopy.com/~djiesoft.blogspot.com?copy=7j60w8 Mon, 16 Apr 2012 03:25:30 +0000






Software yang satu ini berfungsi untuk membuka database microsoft acceess versi 1997/2000/2003. jika di sebuah komputer tidak terinstal microsoft office maka file microsoft access bisa anda buka dengan software ini. ukurannya sangat kecil dan ringan.




Click HERE to download]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=7j60w8 http://blogcopy.com/~djiesoft.blogspot.com?copy=au8pol Mon, 16 Apr 2012 03:21:55 +0000






Kita semua tahu Microsoft menyediakan Management Studio Tools untuk mengelola database Microsoft SQLServer nya. Namun di luar sana banyak sekali software yang sejenis Management Studio dan biasanya terdapat fitur lebih yang tidak ada di Management Studio buatan microsoft itu, salah satunya adalah software dibawah ini. EMS SQL Manager 2008 v3.3.0.1 ini tidak gratis alias trial 30 hari, tetapi disini saya
menyediakan
KEY nya untuk membuat software ini full version, tapi ingat ini hanya
untuk bahan PEMBELAJARAN (for education
only and not for commercial), jika nanti anda merasa software ini
bermanfaat dan membantu anda maka anda harus membeli lisensi yang asli.




Click HERE to download EMS SQL Manager 2008 v3.3.0.1


Click HERE to download EMS SQL Manager 2008 v3.3.0.1 (KEY)


Tags:

free download SQLSrver Database explorer, SQLSrver Database explorer free
download, free download SQLSrver Database browser, SQLSrver database browser
download, free download SQLSrver gui, SQLSrver database browser download
, SQLSrver database explorer download,
download SQLSrver database explorer, SQLSrver analyzer download, download SQLSrver database analyzer]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=au8pol http://blogcopy.com/~djiesoft.blogspot.com?copy=7j60eq Mon, 16 Apr 2012 03:17:44 +0000






Ini merupakan kelajutan dari posting Show Report In Crystal Report Viewer, nah kali ini saya akan share cara mengedit object di crystal report saat runtime. contohnya seperti gambar dibawah ini :


Before Click Button "Change Title And Color"


Kemudian setelah mengisi title di textbox dan click button "change title And Color", maka hasilnya adalah  :


After Click Button "Change Title And Color"


Untuk project dan sintaknya sama dengan yang ada di posting sebelumnya, hanya saja tambahkan sedikit 1 button (name=djiebutton2) untuk "change title and color" dan ini tambahan code nya :


Private Sub djieButton2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles djieButton2.Click

        'declarasi variable

        Dim txtObject As CrystalDecisions.CrystalReports.Engine.TextObject

        Dim fieldObject As CrystalDecisions.CrystalReports.Engine.FieldObject

        Dim rptObject As CrystalDecisions.CrystalReports.Engine.ReportDocument

        rptObject = djieCrystalReportViewer1.ReportSource

        'customize title

        txtObject = rptObject.ReportDefinition.ReportObjects("Text10")

        With txtObject

            .ApplyFont(New Drawing.Font("Comic Sans MS", 18, FontStyle.Bold))

            .Text = TextBox1.Text

            .Color = Color.Blue

        End With

        'customize field lastname

        fieldObject = rptObject.ReportDefinition.ReportObjects("LastName1")

        With fieldObject

            .ApplyFont(New Drawing.Font("Arial", 8, FontStyle.Italic))

            .Color = Color.Red

        End With

        'customize field firstname

        fieldObject = rptObject.ReportDefinition.ReportObjects("FirstName1")

        With fieldObject

            .ApplyFont(New Drawing.Font("Arial", 8, FontStyle.Underline))

            .Color = Color.Green

        End With

        djieCrystalReportViewer1.RefreshReport()


End Sub 

Untuk mengetahui nama object reportnya, buka saja design reportnya, click objek reportnya, lalu liat property name nya, seperti gambar dibawah ini:


Report Design


Nah.. selanjutnya tinggal kembangkan lagi sesui keperluan dan keinginan sobat semua nya... selamat mencoba. gudlak !]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=7j60eq http://blogcopy.com/~djiesoft.blogspot.com?copy=96pcvj Mon, 16 Apr 2012 03:16:33 +0000






Selamat tahun baru 2012... salam sukses untuk semuanya. Posting pertama saya di tahun baru ini adalah tentang cara menampilkan report di Crystal Report Viewer. Saya suka Crystal Report, karena selain mudah dipelajari juga banyak fitur fitur canggihnya. Sebenarnya sangat mudah menampilkan report di crystal report viewer ini, karena cukup dengan mengisi Property ReportSource di CrystalReportViewer, contoh CRViewer1.ReportSource = ReportName.



Hanya saja yang sering jadi masalah adalah pada saat meng-exceute perintah itu terkadang selalu muncul Login Prompt, yaitu kita harus mengisi dahulu user name dan password untuk koneksi ke database. Hal ini tentu sangat menjengkelkan bukan ?!. Baiklah, sebenarnya banyak cara untuk mengatasi hal itu, saya akan share cara menampilkan report with no login prompt yang paling mudah dengan menggunakan SetDataSource.
Agar langsung prakek, siapkan 1 project Visual Basic .NET, 1 Form (name:Form1), 1 Button (name:djieButton1), 1 TextBox (name:djieTextBox1), 1 CyrstalReportViewer (name:djieCrystalReportViewer1), 1 Report employee dari database Northwind.



Saya sudah buatkan functionnya :

Private Sub crystal_report_show(ByVal djieReport As CrystalDecisions.CrystalReports.Engine.ReportDocument, ByVal sql As String)

        Try

            Using con As New Odbc.OdbcConnection("DRIVER=sql server native client 10.0;SERVER=pandjisql2008;UID=sa;PWD=djiesoft;DATABASE=northwind")

                'buat datasource

                con.Open()

                Dim adp As New Odbc.OdbcDataAdapter(sql, con)

                Dim tbl As New DataTable

                adp.Fill(tbl)

                'set report datasource

                With djieReport

                    .SetDataSource(tbl)

                    .Refresh()

                End With

               ''view report

                With djieCrystalReportViewer1

                    .ReportSource = djieReport

                    .Refresh()

                End With

            End Using

        Catch ex As Exception

            MessageBox.Show(ex.Message)

        End Try

    End Sub



Kemudian pada saat button1 di-click:

Private Sub djieButton1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles djieButton1.Click

        Call crystal_report_show(New rptEmployees, djieTextBox1.Text)

End Sub



Sekian posting nya, semoga bisa bermanfaat ya... keep to explore !!!]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=96pcvj http://blogcopy.com/~djiesoft.blogspot.com?copy=au8od3 Mon, 16 Apr 2012 02:58:53 +0000 http://blogcopy.com/~djiesoft.blogspot.com?copy=au8od3 http://blogcopy.com/~djiesoft.blogspot.com?copy=chs0tw Mon, 16 Apr 2012 02:58:34 +0000






Untuk teman teman yang sudah menginstal Visual Studio 2010, tentu sedikit terkejut karena Crystal Report nya ternyata tidak include di package instaler nya, untuk itu sobat harus download dulu Crystal Report For Visual Studio 2010 di sini (gratis). Setelah diinstal dan kita mulai membuat sebuah aplikasi, kemungkinan besar (pasti) sobat mengalami beberapa error. Apakah karena Crystal Report itu tidak compatible atau karena masih versi Beta? yang pasti di sini saya akan mencoba untuk memberikan solusi untuk error error tersebut, berdasarkan pengalaman dan hasil searching saya di google. Berikut ini beberapa error yang saya temukan :
Error 1 : Crystal Report dan Viewer nya tidak muncul di ToolBox


Sebenarnya ini bukan error, tapi dimana Cristal Report dan Viewer nya? padahal sudah kita instal !, jalan keluarnya adalah dengan memilih Crystal Report Aplication pada saat memulai project, bukan Windows Aplication yang seperti biasa kita lakukan, seperti gambar di bawah ini :


Error 2 :
 The referenced assembly "CrystalDecisions.Windows.Forms, Version=13.0.2000.0, Culture=neutral, PublicKeyToken=692fbea5521e1304, processorArchitecture=MSIL" could not be resolved because it has a dependency on "System.Web, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" which is not in the currently targeted framework ".NETFramework,Version=v4.0,Profile=Client". Please remove references to assemblies not in the targeted framework or consider retargeting your project.

Untuk mengatasi error ini, ubahlah Target Framework ".NET Framework 4 Client Profile" ke ".NET Framework 4", caranya klik project properties->klik tab compile->klik Advanced Compiled Options->klik Target Framework, seperti gambar dibawah ini :




Error 3 : 
Reference required to assembly 'CrystalDecisions.Shared, Version=13.0.2000.0, Culture=neutral, PublicKeyToken=692fbea5521e1304' containing the type 'CrystalDecisions.Shared.RequestContext'. Add one to your project.

 Untuk mengatasi error ini, cukup mudah, tutup/close project(close Visual Studio 2010-nya), kemudian open/buka lagi project-nya, error tersebut akan hilang dengan sendirinya.

Error 4 : 
Could not load file or assembly 'file:///C:Program FilesSAP BusinessObjectsCrystal Reports for .NET Framework 4.0CommonSAP BusinessObjects Enterprise XI 4.0win32_x86dotnet1crdb_adoplus.dll' or one of its dependencies. The system cannot find the file specified.
Error ini akan terjadi ketika sobat mencoba untuk merefresh report (SetDataSource), dengan contoh coding seperti ini :
        Dim con As New Odbc.OdbcConnection("dsn=nwind")
        con.Open()
        Dim adp As New Odbc.OdbcDataAdapter("select * from employees", con)
        Dim tbl As New DataTable
        adp.Fill(tbl)
        Dim rpt As New rptEmployees
        rpt.SetDataSource(tbl)
        CrystalReportViewer2.ReportSource = rpt
Error ini maksudnya, file "crdb_adoplus.dll" tidak ada di forlder "C:Program FilesSAP BusinessObjectsCrystal Reports for .NET Framework 4.0CommonSAP BusinessObjects Enterprise XI 4.0win32_x86dotnet1", maka copy file "crdb_adoplus.dll" dari "C:Program FilesSAP BusinessObjectsCrystal Reports for .NET Framework 4.0CommonSAP BusinessObjects Enterprise XI 4.0win32_x86" ke "C:Program FilesSAP BusinessObjectsCrystal Reports for .NET Framework 4.0CommonSAP BusinessObjects Enterprise XI 4.0win32_x86dotnet1", jika folder "dotnet1" tidak ada, maka buatlah terlebih dahulu.

Error 5 :
Mixed mode assembly is built against version 'v2.0.50727' of the runtime and cannot be loaded in the 4.0 runtime without additional configuration information.
Untuk mengatasi error ini, buka "app.config" yang ada di project, kemudia cari ini :

Kemudian replace/ganti dengan ini :

Update! 2012-04-11




OK, sekian yang bisa saya share tentang Crystal Report dan Visual Studio 2010,semoga bisa bermanfaat ...]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=chs0tw http://blogcopy.com/~djiesoft.blogspot.com?copy=fsuper Mon, 16 Apr 2012 02:49:04 +0000 http://blogcopy.com/~djiesoft.blogspot.com?copy=fsuper http://blogcopy.com/~djiesoft.blogspot.com?copy=4839ed Mon, 16 Apr 2012 02:36:43 +0000
Dim RD As Odbc.OdbcDataReader = CMD.ExecuteReader

If RD.Read Then

djiePictureBox1.Image = djieGetDataToImage(RD.Item("PHOTO"))

End If

RD.Close()]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=4839ed http://blogcopy.com/~djiesoft.blogspot.com?copy=96pav1 Mon, 16 Apr 2012 02:36:03 +0000
Try

Dim imgConverter As New System.Drawing.ImageConverter()

Return TryCast(imgConverter.ConvertFrom(pData), Drawing.Image)

Catch ex As Exception

MessageBox.Show(ex.Message, "Error", MessageBoxButtons.OK, MessageBoxIcon.Error)

Return Nothing

End Try

End Function]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=96pav1 http://blogcopy.com/~djiesoft.blogspot.com?copy=chrzse Mon, 16 Apr 2012 02:35:05 +0000






Langsung saja ya.. bagi sobat yang membutuhkan Crystal Report Runtime untuk client, saya sediakan link downloadnya:

1. Download Crystal Report Version 8.5 Runtime (For Visual Basic 6 Aplication)
2. Download Crystal Report Version 10 Runtime (For Visual Basic 6 Aplication)


3. Download Crystal Report Version 2008 Runtime (For Visual Studio 2008 Aplication)


4. Download Crystal Report Version 2010 Runtime (For Visual Studio 2010 Aplication)]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=chrzse http://blogcopy.com/~djiesoft.blogspot.com?copy=7j5y98 Mon, 16 Apr 2012 02:34:01 +0000
Dim DT As New DataTable

ADP.Fill(DT)

djieDataGridView1.DataSource = DT]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=7j5y98 http://blogcopy.com/~djiesoft.blogspot.com?copy=2kjwqb Mon, 16 Apr 2012 02:33:19 +0000
CON.Open()]]> http://blogcopy.com/~djiesoft.blogspot.com?copy=2kjwqb