PHPmaster
20th November 2011, 10:46 AM
gini gan, ane punya potongan script buat nampilin laporan pake data report di VB...
gini scriptnya:
X=msgBox(�Apakah anda akan memcetak Hasil ini�, vbYesNO+VbQuestion,�Informasi�)
If x=vbYes then
Dim DE As Dt_sql
Set DE = New Dt_sql
DE.Command1 Text2.Text, Text3.Text
Text3.SetFocus
DataReport2.Show
Else
Exit sub
Text3.text=� �
Text2.text=� �
End If
End Sub
nah, pas tombol command di form diklik muncul error, peringatannya gini gan method or data member not found.
minta bantuan n pencerahannya ya gan... :ceriwislove:
</div>
gini scriptnya:
X=msgBox(�Apakah anda akan memcetak Hasil ini�, vbYesNO+VbQuestion,�Informasi�)
If x=vbYes then
Dim DE As Dt_sql
Set DE = New Dt_sql
DE.Command1 Text2.Text, Text3.Text
Text3.SetFocus
DataReport2.Show
Else
Exit sub
Text3.text=� �
Text2.text=� �
End If
End Sub
nah, pas tombol command di form diklik muncul error, peringatannya gini gan method or data member not found.
minta bantuan n pencerahannya ya gan... :ceriwislove:
</div>