Buat teman2 yang mau diskusi, saya sediakan di sini. Silahkan berbagi ilmu pengetahuan, dan jangan post komentar yang berbau “SARA’, oke…
Peace… 
Buat teman2 yang mau diskusi, saya sediakan di sini. Silahkan berbagi ilmu pengetahuan, dan jangan post komentar yang berbau “SARA’, oke…
Peace…
wuah udah punya blogger sendiri, nanti yg jawabin forum ane siapa ya huehuehue :d , ok deh om selamat atas blogger-nya.
banyakin tutorialnya ntar ane link-in dari PI pertanyaan rekan2 khususnya yg berminat ama pemrograman.
hehehe..iya nih om. Gak dapet duit tapi dapet pahala kan lebih baik..
.
Soal jawab menjawab sih tetap.. (selagi ada akses internet..huehehe)
Peace..
dree, aku mo ngasih pahala yah .. post ini mulai padat
http://pondokindah.wordpress.com/2006/09/15/visual-basic-mysql-vsflexgrid-crystal-report-3/
saya mau nanya Bagaimana caranya memindahkan/mengcopy field dati tabel satu ke tabel yang lain
—– >
gunakan fasilitas export/import SQL Server
Kak,gimana caranya/fungsi untuk menampilkan tanggal di komponen DTPicker-nya VB,tapi tanggal itu adalah tanggal 1 hari sebelum tanggal sekarang?Misalnya kalo sekarang tgl 20 Agustus 2007,berarti yg ingin saya tampilkan adalah tgl 19 Agustus 2007.
Mohon bantuannya.trims
—— >
Pakai perintah ini :
Me.DTPicker1.Value = Now – 1
Makasih kak jawabannya,trus skr saya ingin nanya lagi.
Kalo ingin menampilkan tanggal akhir bulan gimana caranya? Misalnya skr tgl 22 Agustus,trus saya ingin menampilkan tgl 31 Agustus (tgl akhir bulan). Makasih.
hi all,
mungkin teman2 ada yg bisa bantu, saya punya database sales di db-server dan database production di dbt-server. saya ingin buat query dp database sales dan database production di server db-server. cara buat query nya ini yang saya kesulitan.
mohon bantuannya.
—- >
Pakai format ini dalam querynya : nama_server.nama_database.dbo.nama_tabel.nama_field
Misal :
Ada 2 server, yaitu : SERVER_A dan SERVER_B
Jika ingin query data SERVER_A dari SERVER_B maka querynya sebagai berikut :
SELECT SERVER_A.SALES.dbo.SALES_TRAN.TRANS_NO
FROM SERVER_A.SALES.dbo.SALES_TRAN
Nama server juga bisa diganti dengan menggunakan ip address server. Dengan catatatn, kedua server harus sudah bisa saling berkomunikasi dari SQL Server. Bisa di check melalui Database Master, tabel sysserver. Disitu akan ada record, server2 mana saja yang bisa di buka jalur komunikasi data lewat SQL Server. Kalo belum, gunakan stored procedure sp_addlinkserver.
ka mo nanya dunk, gimana rasanya mau menikah ………
—>
Gubrak…bocor deh rahasianya…hihihi
Rasanya gimana ya……, senang, bahagia, cemas, takut, deg2an….campur aduk (kayak asinan bogor..) kekekekek…
kk tolong bantu saya…
Saya diharuskan untuk membuat converter dari format dbf ke my sql dengan mengguinakan visual basic kk..
Ni buat Tugas Akhir saya kk, mohon bantuan nya kk…
Kak,saya mau nanya caranya manggil file help(.chm) dari form VB gimana? Saya pake syntax gini koq gak mau tampil:
RunFile “D:…\…\help.chm”, MDIForm1
ket: D:…\.. adl folder tempat file help berada
help.chm adl file yg mo saya panggil
MDIForm1 adl form di VB yg terdapat menu help yg mo saya panggil
Kak, saya mau nanya dong,
Kalo koneksi crystal report 9 ke vb gimana ya kak, aku pernah coba pake crystal report 8 pake komponen crystal report control kodenya sbb :
Private Sub cmdprint_Click()
Lihat_Report “namareport”, “{namaview.fieldkriteria} = ” & kriteria
End Sub
Sub Lihat_Report(laporan As String, saring As String)
With Report1
.LogOnServer “p2ssql.dll”, “nama server”, “namadatabase”, “uid”, “password”
.ReportFileName = App.Path & “\report\” & laporan & “.rpt”
.WindowState = crptMaximized
.SelectionFormula = saring
.Action = 1
.Reset
End With
End Sub
Tapi kalo digunakan di crystal report 9 tidak bisa, unable load report, atau logon failure, kenapa ya…. ?
Terima kasih sebelumnya
Salam
Tasya
–>
saya kasih contoh dengan memakai Crystal Report 10 ya, tinggal di modifikasi dikit aja…
Berikut scriptnya :
Dim crxReport As New CRAXDRT.REPORT
Dim crxApplication As New CRAXDRT.Application
Dim crxsubreport As New CRAXDRT.REPORT
Set crxReport = crxApplication.OpenReport(App.Path & “\REPORTS\REPORT.RPT, 1)
Call crxDatabaseLoginInfo(crxReport, ServerNM, dtBaseNM, Password)
RptViewerForm.Show
‘********* PROCEDURE KONEKSI REPORT *********
Public Sub crxDatabaseLoginInfo(ByRef crxReport As CRAXDRT.REPORT, ByVal SERVER_NM As String, ByVal DBASE_NM As String, ByVal PASS_NM As String)
Dim i As Integer
Dim tabname As String
Dim strSubreport As String
Dim NoOfsubreport As Integer
Dim CRXSECTION As CRAXDRT.Section
Dim CRXOBJECT As Object
Dim STR(1 To 10) As String
Dim counter As Integer
On Error GoTo ErrorMSG
For Each crxDatabaseTable In crxReport.Database.Tables
tabname = crxDatabaseTable.Location
tabname = Mid(tabname, InStr(InStr(1, tabname, “.”) + 1, tabname, “.”) + 1, Len(tabname))
Select Case UCase(tabname)
Case “” ‘— TABLE NAME —
VLTAB = DBASE_NM
VGRPTSERVER = SERVER_NM
Case Else ‘— TABLE NAME —
VLTAB = DBASE_NM
VGRPTSERVER = SERVER_NM
End Select
crxDatabaseTable.SetLogOnInfo SERVER_NM, VLTAB, “sa”, PASS_NM
If UCase(tabname) “COMMAND” Then
crxDatabaseTable.Location = VLTAB + “.dbo.” + tabname
End If
Next crxDatabaseTable
For Each CRXSECTION In crxReport.Sections
For Each CRXOBJECT In CRXSECTION.ReportObjects
If CRXOBJECT.Kind = crSubreportObject Then
NoOfsubreport = NoOfsubreport + 1
STR(NoOfsubreport) = CRXOBJECT.SubreportName
End If
Next CRXOBJECT
Next CRXSECTION
If NoOfsubreport > 0 Then
For counter = 1 To NoOfsubreport
Set crxsubreport1 = crxReport.OpenSubreport(STR(counter))
For Each crxDatabaseTable In crxsubreport1.Database.Tables
tabname = crxDatabaseTable.Location
tabname = Mid(tabname, InStr(InStr(1, tabname, “.”) + 1, tabname, “.”) + 1, Len(tabname))
Select Case UCase(tabname)
Case “” ‘— TABLE NAME —
VLTAB = DBASE_NM
VGRPTSERVER = SERVER_NM
Case Else ‘— TABLE NAME —
VLTAB = DBASE_NM
VGRPTSERVER = SERVER_NM
End Select
crxDatabaseTable.SetLogOnInfo SERVER_NM, VLTAB, “sa”, “”
If UCase(tabname) “COMMAND” Then
crxDatabaseTable.Location = VLTAB + “.dbo.” + tabname
End If
Next crxDatabaseTable
Next counter
End If
Exit Sub
ErrorMSG:
MsgBox Err.Number & vbCrLf & Err.Description, vbExclamation, Err.Source
End Sub
Q mo tanya,
kemaren aq nyoba koneks crystal report 8.5 ke mysql 5.0
kalo pake 1 tabel masih keluar recordnya. tapi kalo pake 2 tabel yang q link tabelnya, record dataku g mau keluar.
apa untk menkoneksikaan cr 8.5 sama mysql membutuhkaan software lain?
—->
Coba periksa lagi link tabelnya..mungkin link tablenya tidak sesuai, atau malah salah link..
iy sama ak ngak bs tampilin reportnay kl relasi 2 tabel.Ad yang punya solusi ?
ak dpt satu link tp belum tak coba
http://dev.mysql.com/doc/refman/5.0/en/connector-net-using-crystal.html
Gimana caranya menampilkan sintax vb – crstal report bila memakai banyak kriteria misalnya.
Ingin menampilkan :
nilai pada txtnama1.text,txtnama2.text,txtnama3.text,dan tbl.id
Please yachh bantuannya…
Numpang tanya nih aku lagi bkn program pakai vb k mysql n lap pakai crystal report. Pas jalanin mysql di komp os windows dia jalan user root pass ….. n pas aku pindahin k server (os linux) jalan sih tp yg ke crystal reportny di billang cannot connect to sql server. Tolong bantuannya ya
–>
Koneksi dari Crystal Report pakai apa ? ODBC atau OLEDB ? coba buka reportnya dari Crystal Report, terus verify ke server yang baru (Linux). biasanya kalau menggunakan OLEDB, harus di verify dulu. kecuali kalau dari Code VB-nya, reportnya sudah diarahkan ke server database yang baru.
ka,,mo tanya donk,,gmn ya caranya bikin report d Crystal Report 8.5 pake stored procedure dari SQL Server 2000??
thx ya sebelumnya
mo tanya nih..kl tdk bs nyimpan data baru di database…apa da script yg salah….
->
coba cek sintak insert nya…
ka.., mo tanya dong…., aku lagii buat form transaksi…, truz memakai adodc dan datagrid ka…, menggunakan tbldetail…., setelah melakukan transaksi, untuk transaksi berikutnya gar datagridnya kosong codingnya gimana ya ka….,? aku pake data access kaka….., thank’s ya kaka…..
mahon bantuannya smua,,,,,, untuk menampilkan data dari datagrid ke text jika di klik gmna ya,,,,,,,,,,?????
ka mo tanya dong
masih suka nulis disini ga?