[Tutorial]Belajar Programming .NET Language

[Hitman™]

nko salah kat query nko tu :

sql = "select max (NoTransaction) as MAXNO from Transaction"

dah test query ni dalam DB belum? kalu success dpt result meaning query nko OK tp base on error yg nko dpt tadi tu sah2 silap kat sini...:-?

try ubah jadi camni :

sql = @"SELECT MAX [NoTransaction] AS MAXNO FROM [DatabaseAku].[dbo].[tbl_Transaction];";

dah xde error kat "from clause"

tp error kat "insert Intro" plak..

EDIT

okay..this is getting ridiculous.

sekarang ada error "now im having "conversion from type dbnull to long is not valid"

apa masalah la neh

 

[mutanic]

knp sblm ni sy x pnh jumpa thread ni?

sy nak authenticate users guna active directory..
da jenuh mengoogle tp x bp jalan utk di apply dlm current system.
boleh sesapa tunjuk ajar..

check connection string bro...
aku xpenah lagi wat authentication ngan AD ni, maybe yg lelain boleh bantu...

 

[d-10]

check connection string bro...
aku xpenah lagi wat authentication ngan AD ni, maybe yg lelain boleh bantu...

tq..
da settle..
connection provider x msukkan

connectionUsername="testdomain\administrator"
connectionPassword="password"/>

 

[mutanic]

dah xde error kat "from clause"

tp error kat "insert Intro" plak..

EDIT

okay..this is getting ridiculous.

sekarang ada error "now im having "conversion from type dbnull to long is not valid"

apa masalah la neh

xkan error mesej x cakap line ke berapa yg problem?
error yg nko cakap tu masalah value conversion x silap aku...
tu part kat mana nko nak save data dlm DB dah...

~ check kat DB format untuk number/currency format
~ wat checking samada value yg nak save ke DB tu null or not, kalu null better pass value at least 0 or 0.00 kaa depend on format column kat DB, pendek cite wat pre-default value laa
~ wat exception untuk skip error

 

[mutanic]

tq..
da settle..
connection provider x msukkan

congrats bro

 

[Hitman™]

xkan error mesej x cakap line ke berapa yg problem?
error yg nko cakap tu masalah value conversion x silap aku...
tu part kat mana nko nak save data dlm DB dah...

~ check kat DB format untuk number/currency format
~ wat checking samada value yg nak save ke DB tu null or not, kalu null better pass value at least 0 or 0.00 kaa depend on format column kat DB, pendek cite wat pre-default value laa
~ wat exception untuk skip error

error tue keluar bila aku nak save reciept..

masa coding takde keluar error.

anyway aku dah email projek

 

[mutanic]

error tue keluar bila aku nak save reciept..

masa coding takde keluar error.

anyway aku dah email projek

mak aih...kasi project terus#:-S
*** aku cuma akan bantu part ni jer bro, maybe aku betul or maybe aku salah so keep asking for answer..

mmg masa coding ok sbb x jumpa keadaan camtu, maksud aku contoh :

dlm banyak2 input textbox la listbox la bla bla bla sume tu...
time nak save data, ada input yg blank/empty, so problem maybe kat sql nko :

sql = "insert into Transaction (NoTransaction,NoProduct,TotalPrice,Quantity,DateTime) values (:0           ,:1       ,:2        ,:3      ,:4)"

apa benda yg nko nak save tu??? ni value atau refer ke object?

:0
:1
:2
:3
:4

atau nko nak wat camni?

sql = @"INSERT INTO [DatabaseAku].[dbo].[tbl_Transaction] ([TotalAmount]) VALUES (" + txtTotalAmount.Text + ");"

bergantung pada program nko, nko nak save value dari txtTotalAmount ke column TotalAmount even txtTotalAmount null/blank/empty, dalam kes ni bila mai part nak save kat arahan insert tu maybe akan triger error sbb xda value apa pun nak simpan...tapi kalu nko wat camni :

try
   if (txtTotalAmount.Text != "" || txtTotalAmount.Text != null)
      sql = @"INSERT INTO [DatabaseAku].[dbo].[tbl_Transaction] ([TotalAmount]) VALUES (" + txtTotalAmount.Text + ");"
   else
      sql = @"INSERT INTO [DatabaseAku].[dbo].[tbl_Transaction] ([TotalAmount]) VALUES (0.00);"
Catch ex As Exception
   MsgBox(ex.Message, MsgBoxStyle.Critical Or MsgBoxStyle.OkOnly, "error")
End Try

insyaAllah boleh kot...

aku just taip jer nih, ntah jadi ker x tu nko kena try & error la bro...

 

[Hitman™]

mak aih...kasi project terus#:-S
*** aku cuma akan bantu part ni jer bro, maybe aku betul or maybe aku salah so keep asking for answer..

mmg masa coding ok sbb x jumpa keadaan camtu, maksud aku contoh :

dlm banyak2 input textbox la listbox la bla bla bla sume tu...
time nak save data, ada input yg blank/empty, so problem maybe kat sql nko :

sql = "insert into Transaction (NoTransaction,NoProduct,TotalPrice,Quantity,DateTime) values (:0           ,:1       ,:2        ,:3      ,:4)"

apa benda yg nko nak save tu??? ni value atau refer ke object?

:0
:1
:2
:3
:4

atau nko nak wat camni?

sql = @"INSERT INTO [DatabaseAku].[dbo].[tbl_Transaction] ([TotalAmount]) VALUES (" + txtTotalAmount.Text + ");"

bergantung pada program nko, nko nak save value dari txtTotalAmount ke column TotalAmount even txtTotalAmount null/blank/empty, dalam kes ni bila mai part nak save kat arahan insert tu maybe akan triger error sbb xda value apa pun nak simpan...tapi kalu nko wat camni :

try
   if (txtTotalAmount.Text != "" || txtTotalAmount.Text != null)
      sql = @"INSERT INTO [DatabaseAku].[dbo].[tbl_Transaction] ([TotalAmount]) VALUES (" + txtTotalAmount.Text + ");"
   else
      sql = @"INSERT INTO [DatabaseAku].[dbo].[tbl_Transaction] ([TotalAmount]) VALUES (0.00);"
Catch ex As Exception
   MsgBox(ex.Message, MsgBoxStyle.Critical Or MsgBoxStyle.OkOnly, "error")
End Try

insyaAllah boleh kot...

aku just taip jer nih, ntah jadi ker x tu nko kena try & error la bro...

haha..maaflah.

aku tak reti nak hantar source code..

bila nak hantar project, yahoo detect .exe

so yahoo tak bagi aku send file tue.

aku dah jumpa member aku.

aku buat bentuk lain, but still aku tak boleh save dalam database.

sebab aku tak link lagi.

malam neh aku link kan dulu, nanti aku bagitau kalau dah ok.

 

[mutanic]

bila aku teliti lama2 mmg aku pening ngan VB skrg...hahaha...tp seriously nko kena check part nko nak insert tu...wat try catch untuk identify part yg bermasalah...

 

[chuki2]

Untuk VB... untuk asas INSERT kedalam SQL, boleh cuba guna kaedah ini.. :

Dim con As New SqlConnection
Dim cmd As New SqlCommand

con.ConnectionString = "connection string anda"

cmd.Connection = con
cmd.CommandText = "INSERT INTO Transaction(amount,date ) VALUES(@amount, @date)"
sqlComm.Parameters.AddWithValue("@amount", tbAmount.Text)
sqlComm.Parameters.AddWithValue("@date", tbDate.Value)

Try
con.Open()
cmd.ExecuteNonQuery()
con.Close()

Catch ex As SqlExecption

MessageBox.Show("Gagal masukkan kedalam table.." & ex.Message, "Insert Records")

Finally

End Try

Tapi dari pemerhatian saya dari code bro, bro cuba nak masukkan data mengunakan Data Grid View...

Dan sebab itu bro buat foreach dalam data grid view untuk masukkan semua record kedalam table transaction..

Betul?


Jadi apa yang saya boleh cadangkan, bro boleh cuba cara seperti ini...

For i = 0 To DGV2.Rows.Count - 1

Dim con As New SqlConnection
Dim cmd As New SqlCommand

con.ConnectionString = "connection string anda"

cmd.Connection = con
cmd.CommandText = "INSERT INTO Transaction(amount,date ) VALUES(@amount, @date)"

'Merujuk kepada column pertama dalam datagrid iaitu amount
sqlComm.Parameters.AddWithValue("@amount", Decimal.Parse(DGV2.Rows[i].Cells[0].Value.ToString()))

'Merujuk kepada column dalam datagrid kedua iaitu tarikh
sqlComm.Parameters.AddWithValue("@date", DateTime.Parse(DGV2.Rows[i].Cells[1].Value.ToString()))

Try
con.Open()
cmd.ExecuteNonQuery()
con.Close()

Catch ex As SqlException

MessageBox.Show("Gagal masukkan kedalam table.." & ex.Message, "Insert Records")

Finally
con.Dispose()
End Try

Jadi bro faham apa saya cuba explain? Kita lihat disini DGV2.Rows.Cells[0].Value.ToString()

Ianya bermaksud kita dapatkan nilai daripada pada baris pertama .Rows[1] dan juga cell daripada column pertama iaitu .Cells[0]..

Jadi, setiap kali bro buat foreach, i atau pun kita panggil Index akan menaik..Dan proses akan menjadi seperti ini

DGV2.Rows[1].Cells[0].Value.ToString()
DGV2.Rows[2].Cells[0].Value.ToString()
DGV2.Rows[3].Cells[0].Value.ToString()
'dan seterusnya

Sampai habis foreach, i tadi akan stop pada nilai terakhir...Iaitu pada akhir row data grid..

Yang kedua, yup bro memang bagus sebab pakai parameter. Jadi bro mesti tahu apa kelebihan mengunakan parameter.. betul?

Kebiasaanya, dalam table transaction data type amount akan pakai jenis "Decimal" dan data type date pula akan pakai jenis "DateTime"... betul?

Jadi apa kesilapan bro buat, bro tidak parse value dari datagrid ke parameter, sebab itu dia akan keluar error "conversion from type dbnull to long is not valid"....

Jadi untuk elakkan error seperti itu, bro kena tambah Decimal.Parse atau DateTime.TryParse...

Contohnya seperti ini :

'Parse dari string ke decimal
Decimal.Parse(DGV2.Rows[i].Cells[0].Value.ToString())

'Parse dari string ke datetime
DateTime.Parse(DGV2.Rows[i].Cells[1].Value.ToString())

'Dan contohnya ada data type jenis Int boleh la wat gini
int.Parse(DGV2.Rows[i].Cells[3].Value.ToString())

Jadi harap bro paham penerangan saya..., sorry kalau ada error.. VB dah tak igt sangat... huhuhu

Happy programming....