Laman Utama Tanya Wiki English Artikel Komuniti E-Mel Ringtones Search

Bantuan | Carian | Ahli | Kalendar

Google

Selamat Datang ( Log In | Daftar )

2 Pages V   1 2 >  
Reply to this topicStart new topic
Nk Update.., utk replace data
kAmBeNg KeR
post May 16 2008, 10:29 AM
Kiriman #1


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150



Assalamualaikum wbt...

saya ade masalah skit ni..
sy de wat form edit.aspx n form tu akan terima nilai dari carian3.aspx atau dari permohonanbaru.aspx..
masalahnya sy xdpt hantar nilai dari dua form tu ke form edit..

ni coding utk form edit...
CODE
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)
        Dim obj As String
        'On Error Resume Next

        UserID = Request.QueryString("ID")

        obj = "SELECT * FROM Pelajar where PelajarID= " & UserID
            If Conn.State = ConnectionState.Closed Then
                Conn.Open()
            End If
            Dim objcommand As New OleDbCommand(obj, Conn)


            Dim dr As OleDbDataReader
            dr = objcommand.ExecuteReader

            dr.Read()

            Me.lblPelajarID.Text = CStr(Trim(dr.Item("NoID")))
            Me.txtNama.Text = CStr(Trim(dr.Item("Nama")))
            Me.txtNoTel.Text = CStr(Trim(dr.Item("NoTel")))
            Me.txtNoMatrik.Text = CStr(Trim(dr.Item("NoMatrik")))
            Me.txtProgram.Text = CStr(Trim(dr.Item("Program")))
            Me.txtPenyelia.Text = CStr(Trim(dr.Item("Penyelia")))
            Me.txtEmel.Text = CStr(Trim(dr.Item("Emel")))

            dr.Close()
            Conn.Close()

    End Sub


yang ni pulak form carian3.aspx n form permohonanbaru.aspx..
CODE
Protected Sub btnEdit_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnEdit.Click

        Response.Redirect("Edit.aspx?ID= " & UserID)

    End Sub


sepatutnya form edit akan paparkan nilai kat textboxt2 yang ade..
kemudian ade button tambah,,hapus dan kemaskini dalam form tu utk hubungkan ngan database pulak,,
tlg lah yer... unsure.gif

Kiriman ini telah diubahsuai oleh kAmBeNg KeR: May 30 2008, 11:52 AM


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post May 23 2008, 10:55 AM
Kiriman #2


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150



Salam.. blush.gif

macam mane nak hantar nilai klau amik dua nilai dari table berbeza dan ID yg lain..
cth:

dari form1 amik data dari table Pelajar dan menggunakan PelajarID sebagai id utk table Pelajar kemudian dari form2 akan amik nilai dari table Sementara dan menggunakan NoID sebagai id utk table Sementara.... unsure.gif

coding utk amik satu nilai jer mcm ni
CODE
obj = "SELECT * FROM Sementara WHERE NoID LIKE '%" & UserID & "%'"


tapi klau utk dua2 nilai tu?
nak gabungkan 2 statement ni?
CODE
obj = "SELECT * FROM Pelajar WHERE PelajarID LIKE '%" & UserID & "%'"

CODE
obj = "SELECT * FROM Sementara WHERE NoID LIKE '%" & UserID & "%'"


mintak tolong ek..
sekarang ni cume bole run salah satu jer.. wacko.gif

Kiriman ini telah diubahsuai oleh kAmBeNg KeR: May 23 2008, 10:58 AM


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
DevGuy
post May 23 2008, 12:34 PM
Kiriman #3


Ahli Rajin
****

Grup: Members
Kiriman: 507
Penyertaan: 20-April 04
Ahli ke- 257



tak faham aaaa

cuma kalau nak send tak leh ada space

Response.Redirect("Edit.aspx?ID= " & UserID)

sepatutnya

Response.Redirect("Edit.aspx?ID=" & UserID)

cuba check balik

apa yg lain table
huhuhu
Go to the top of the page
 
+Quote Post
DrASAG
post May 23 2008, 02:23 PM
Kiriman #4


Ahli
***

Grup: Members
Kiriman: 167
Penyertaan: 20-June 07
Dari: Kuala Lumpur
Ahli ke- 31,684



A'kum. apo ko ckp tuh... kalo nak amik nilai dari 2 table, pakai JOIN ar... INNER JOIN ka, LEFT JOIN ka, RIGHT JOIN ka.... betui ka? cocopie.. hohohoho


--------------------
PEGI PEKAN BELI TAYAR, AKU MAKAN KO BAYAR....
my blog : http://e-onestopcentre.blogspot.com
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post May 23 2008, 03:08 PM
Kiriman #5


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150




data tu nak papar kat textbox..
nilai yg dia amik antara dua table,, maksudnya klau dia masuk form edit tu dari button edit kat formA tu dia akan amik nilai dari table Pelajar dan klau dia masuk form edit tu dari button edit kat formB dia akan amik nilai dari table Sementara..
id utk dua2 table tu lain.. utk table Pelajar id dia PelajarID dan utk table Sementara id dia NoID..

JOIN tu mcm mane?
klau sql punye same ke utk access?
dpt cth ni tadi..
CODE
SELECT E_Name FROM Employees_Norway
UNION
SELECT E_Name FROM Employees_USA


Sumber utk union tu..


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
DrASAG
post May 23 2008, 04:20 PM
Kiriman #6


Ahli
***

Grup: Members
Kiriman: 167
Penyertaan: 20-June 07
Dari: Kuala Lumpur
Ahli ke- 31,684



ooo itu mcm ka? tak pyh pakai join... kat form edit tu, kena check ar dari mana nilai tu dtg. kalo dari formA, select dr tbl pelajar, kalo dari formB, select dari tbl sementara.. itu jer.....


--------------------
PEGI PEKAN BELI TAYAR, AKU MAKAN KO BAYAR....
my blog : http://e-onestopcentre.blogspot.com
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post May 26 2008, 10:16 AM
Kiriman #7


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150



QUOTE(DrASAG @ May 23 2008, 04:28 PM) *
ooo itu mcm ka? tak pyh pakai join... kat form edit tu, kena check ar dari mana nilai tu dtg. kalo dari formA, select dr tbl pelajar, kalo dari formB, select dari tbl sementara.. itu jer.....



guna if else?

cam ne ek?
name form tu nk declare cam ne?
ataupun wat cam ni?

CODE
If ID = "formA" Then
            obj = "SELECT * FROM Pelajar WHERE PelajarID LIKE '%" & UserID & "%'"
        ElseIf ID = "FormB" Then
            obj = "SELECT * FROM Sementara WHERE NoID LIKE '%" & UserID & "%'"
        End If


tp yg ni pun xkuar kan data kat textbox tu..

ade yg ajar suh wat mcm ni
CODE
SELECT * FROM Pelajar a INNER JOIN Sementara b ON a.PelajarID = b.NoID WHERE a.PelajarID LIKE '%" & UserID & "%'"

CODE
Select * From Sementara as T1, Pelajar as T2 where T1.NoID=T2.PelajarID WHERE T2.PelajarID LIKE '%" & UserID & "%'"


tp xde yg menjadi.. sad.gif

Kiriman ini telah diubahsuai oleh kAmBeNg KeR: May 26 2008, 10:26 AM


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post May 30 2008, 10:57 AM
Kiriman #8


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150




sy ade 1 lg masalah... wacko.gif
sy da dpt command utk add dan delete tapi command utk update xdapat..
mcm mane sy nak update bg data yg di edit tu akan replace ngan data baru..
cth klau data untuk student nama ali dan student tu tuka bilik so user akan update dan replace no bilik ali tu tanpa ade duplicate nama yg sama..

ni coding yg sy wat..
CODE
    Protected Sub btnKemaskini_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnKemaskini.Click

        Dim obj As String
        Dim objcommand As Data.OleDb.OleDbCommand

        obj = "UPDATE INTO Pelajar WHERE PelajarID LIKE '%" & UserID & "%'"

        objcommand = New Data.OleDb.OleDbCommand(obj, conn)
        If Conn.State = ConnectionState.Closed Then
            Conn.Open()
        End If

' coding utk replace tu xtaw

  Response.Redirect("PermohonanBaru1.aspx")


de sape2 boleh tolong x.. unsure.gif


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post May 30 2008, 11:49 AM
Kiriman #9


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150



CODE
    Protected Sub btnKemaskini_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnKemaskini.Click

        Dim conn As Data.OleDb.OleDbConnection
        Dim obj As String
        Dim objcommand As Data.OleDb.OleDbCommand

        Conn = New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data Source=C:\Sistem.mdb")

        obj = "UPDATE INTO Pelajar WHERE PelajarID LIKE '%" & UserID & "%'"

        objcommand = New Data.OleDb.OleDbCommand(obj, conn)

        objcommand.Parameters.AddWithValue("Nama", txtNama.Text)
        objcommand.Parameters.AddWithValue("NoTel", txtNoTel.Text)
        objcommand.Parameters.AddWithValue("NoMatrik", txtNoMatrik.Text)
        objcommand.Parameters.AddWithValue("Program", txtProgram.Text)
        objcommand.Parameters.AddWithValue("Penyelia", txtPenyelia.Text)
        objcommand.Parameters.AddWithValue("Emel", txtEmel.Text)
        objcommand.Parameters.AddWithValue("NoBilik", txtBilik.Text)
        objcommand.Parameters.AddWithValue("Kemudahan", txtKemudahan.Text)
        objcommand.Parameters.AddWithValue("Status", txtStatus.Text)
        objcommand.Parameters.AddWithValue("bilikId", txtBid.Text)

        conn.Open()
        objcommand.ExecuteNonQuery()
        conn.Close()

        Response.Redirect("PermohonanBaru1.aspx")

    End Sub


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
DevGuy
post May 30 2008, 03:20 PM
Kiriman #10


Ahli Rajin
****

Grup: Members
Kiriman: 507
Penyertaan: 20-April 04
Ahli ke- 257



kalau awak buat ni mmg sah22 lew takj kleh update
mana leh guna like cik adik oiii
huhuhuh


obj = "UPDATE INTO Pelajar WHERE PelajarID LIKE '%" & UserID & "%'"
tukar ker

obj = "UPDATE INTO Pelajar WHERE PelajarID ='" & UserID & "'"

ok good luckk

Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post May 30 2008, 04:02 PM
Kiriman #11


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150



QUOTE(DevGuy @ May 30 2008, 03:28 PM) *
kalau awak buat ni mmg sah22 lew takj kleh update
mana leh guna like cik adik oiii
huhuhuh


obj = "UPDATE INTO Pelajar WHERE PelajarID LIKE '%" & UserID & "%'"
tukar ker

obj = "UPDATE INTO Pelajar WHERE PelajarID ='" & UserID & "'"

ok good luckk



same jer..
tak jadi pape pon..

tu la devguy..
i tggu klas u tu tak jadi2 lg..
Li pon da tinggal 2 miggu jer..
masalah pon da tinggal nak update ngan de tuka password jer..
bila nak wat kelas??
org pun da sibuk ngan klas driving..
mcm takde harapan je nak gi..


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
DevGuy
post May 30 2008, 04:31 PM
Kiriman #12


Ahli Rajin
****

Grup: Members
Kiriman: 507
Penyertaan: 20-April 04
Ahli ke- 257



oo soryy salahh
awak taru update
"UPDATE INTO Pelajar WHERE PelajarID ='" & UserID & "'"
ni jerr
tapi parameter awak kasik semua
mana lehh
kena aa taruk semua gak kat update tuuu
huhuh
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post May 30 2008, 04:51 PM
Kiriman #13


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150



QUOTE(DevGuy @ May 30 2008, 04:39 PM) *
oo soryy salahh
awak taru update
"UPDATE INTO Pelajar WHERE PelajarID ='" & UserID & "'"
ni jerr
tapi parameter awak kasik semua
mana lehh
kena aa taruk semua gak kat update tuuu
huhuh



ni error yg kuar..
Syntax error in UPDATE statement.

kat objcommand.ExecuteNonQuery()

coding da ubah cam ni..
CODE
obj = "UPDATE Nama,NoTel,NoMatrik,Program,Penyelia,Emel,NoBilik,Kemudahan,
Status,bilikid INTO Pelajar WHERE PelajarID ='" & UserID & "'"


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
thalz142
post May 30 2008, 07:23 PM
Kiriman #14


Ahli Rajin
****

Grup: Members
Kiriman: 509
Penyertaan: 24-January 06
Dari: SAUDI ARABIA, KL
Ahli ke- 13,991



QUOTE(kAmBeNg KeR @ May 30 2008, 04:59 PM) *
ni error yg kuar..
Syntax error in UPDATE statement.

kat objcommand.ExecuteNonQuery()

coding da ubah cam ni..
CODE
obj = "UPDATE Nama,NoTel,NoMatrik,Program,Penyelia,Emel,NoBilik,Kemudahan,
Status,bilikid INTO Pelajar WHERE PelajarID ='" & UserID & "'"



klu x silap aku update stmt = "UPDATE TABLE SET name='ali', darjah='2' WHERE PelajarID ='" & UserID & "'"

sape ajar ko update stmt camtuh!!nk kene piat telinga ke??


--------------------
Sabda Nabi saw:

"Ku tinggalkan untuk mu 2 perkara (pusaka), tak lah kamu akan tersesat selama-lamanya, selama kamu masih berpegang kepada keduanya, iaitu Kitabullah (Al Quran) dan Sunnah Rasul-Nya"
Go to the top of the page
 
+Quote Post
DevGuy
post May 30 2008, 11:50 PM
Kiriman #15


Ahli Rajin
****

Grup: Members
Kiriman: 507
Penyertaan: 20-April 04
Ahli ke- 257



ha yg that142 buat tu baru betul
heheh
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post Jun 2 2008, 09:00 AM
Kiriman #16


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150



QUOTE(thalz142 @ May 30 2008, 07:31 PM) *
klu x silap aku update stmt = "UPDATE TABLE SET name='ali', darjah='2' WHERE PelajarID ='" & UserID & "'"

sape ajar ko update stmt camtuh!!nk kene piat telinga ke??



alamak.. ohmy.gif
jgn la mrh..
sy dak br blajo klau salah jgn bior.. tongue.gif

maknenye UPDATE [nama table] SET [nama kolum] = '[letak nilai dia ke?]', [nama kolum gak?] WHERE PelajarID = '" & UserID & "'"

cam ni ke??


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post Jun 2 2008, 10:56 AM
Kiriman #17


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150



CODE
obj = "UPDATE Pelajar SET Nama=' ', NoMatrik=' ', NoTel=' ', Program=' ', Penyelia=' ', Emel=' ', NoBilik=' ', Kemudahan=' ', StatusPelajar=' ', bilikid=' ' WHERE PelajarID ='" & UserID & "'"


da try cam tu tp bile run data tu xreplace pon..
xjadi pape..
pastu bile ltk nilai kat Nama='saya', NoTel='8585' dia error kat objcommand..

ni coding pnuh..
CODE
    Protected Sub btnKemaskini_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnKemaskini.Click

        Dim conn As Data.OleDb.OleDbConnection
        Dim obj As String
        Dim objcommand As Data.OleDb.OleDbCommand

        Conn = New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data Source=C:\Sistem.mdb")

        obj = "UPDATE Pelajar SET Nama=' ', NoMatrik=' ', NoTel=' ', Program=' ', Penyelia=' ', Emel=' ', NoBilik=' ', Kemudahan=' ', StatusPelajar=' ', bilikid=' ' WHERE PelajarID ='" & UserID & "'"

        objcommand = New Data.OleDb.OleDbCommand(obj, conn)

        objcommand.Parameters.AddWithValue("Nama", txtNama.Text)
        objcommand.Parameters.AddWithValue("NoTel", txtNoTel.Text)
        objcommand.Parameters.AddWithValue("NoMatrik", txtNoMatrik.Text)
        objcommand.Parameters.AddWithValue("Program", txtProgram.Text)
        objcommand.Parameters.AddWithValue("Penyelia", txtPenyelia.Text)
        objcommand.Parameters.AddWithValue("Emel", txtEmel.Text)
        objcommand.Parameters.AddWithValue("NoBilik", txtBilik.Text)
        objcommand.Parameters.AddWithValue("Kemudahan", txtKemudahan.Text)
        objcommand.Parameters.AddWithValue("StatusPelajar", txtStatus.Text)
        objcommand.Parameters.AddWithValue("bilikid", txtBid.Text)

        conn.Open()
        objcommand.ExecuteNonQuery()
        conn.Close()

        Response.Redirect("PermohonanBaru1.aspx")

    End Sub


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
DrASAG
post Jun 2 2008, 11:44 AM
Kiriman #18


Ahli
***

Grup: Members
Kiriman: 167
Penyertaan: 20-June 07
Dari: Kuala Lumpur
Ahli ke- 31,684



Salam...... jgn tinggal kosong ... ' ' tu.... letak variable.....

CODE
Protected Sub btnKemaskini_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles btnKemaskini.Click

        Dim conn As Data.OleDb.OleDbConnection
        Dim obj As String
        Dim objcommand As Data.OleDb.OleDbCommand

        Conn = New Data.OleDb.OleDbConnection("Provider=Microsoft.Jet.OleDb.4.0;Data Source=C:\Sistem.mdb")

        obj = "UPDATE Pelajar SET Nama=@sNama, NoMatrik=@sNoMatrik, NoTel=@sNoTel, Program=@sProgram, Penyelia=@sPenyelia, Emel=@sEmel, NoBilik=@sNoBilik, Kemudahan=@sKemudahan, StatusPelajar=@sStatusPelajar, bilikid=@sbilikid WHERE PelajarID=@sPelajarID"

        objcommand = New Data.OleDb.OleDbCommand(obj, conn)

        objcommand.Parameters.AddWithValue("@sNama", txtNama.Text)
        objcommand.Parameters.AddWithValue("@sNoTel", txtNoTel.Text)
        objcommand.Parameters.AddWithValue("@sNoMatrik", txtNoMatrik.Text)
        objcommand.Parameters.AddWithValue("@sProgram", txtProgram.Text)
        objcommand.Parameters.AddWithValue("@sPenyelia", txtPenyelia.Text)
        objcommand.Parameters.AddWithValue("@sEmel", txtEmel.Text)
        objcommand.Parameters.AddWithValue("@sNoBilik", txtBilik.Text)
        objcommand.Parameters.AddWithValue("@sKemudahan", txtKemudahan.Text)
        objcommand.Parameters.AddWithValue("@sStatusPelajar", txtStatus.Text)
        objcommand.Parameters.AddWithValue("@sbilikid", txtBid.Text)
                                objcommand.Parameters.AddWithValue("@sPelajarID", UserID)

        conn.Open()
        objcommand.ExecuteNonQuery()
        conn.Close()

        Response.Redirect("PermohonanBaru1.aspx")

    End Sub


Kiriman ini telah diubahsuai oleh DrASAG: Jun 2 2008, 11:46 AM


--------------------
PEGI PEKAN BELI TAYAR, AKU MAKAN KO BAYAR....
my blog : http://e-onestopcentre.blogspot.com
Go to the top of the page
 
+Quote Post
kAmBeNg KeR
post Jun 2 2008, 02:33 PM
Kiriman #19


Ahli
***

Grup: Members
Kiriman: 448
Penyertaan: 20-February 08
Dari: kL
Ahli ke- 43,150




da try da tp still error yg same..
Data type mismatch in criteria expression.

td ade try mcm ni jugak sblm try sugesstion DrASAG tu..
CODE
obj = "UPDATE Pelajar SET Nama='" & txtNama.Text & " ', NoMatrik='" & txtNoMatrik.Text & "', NoTel='" & txtNoTel.Text & "', Program='" & txtProgram.Text & "', Penyelia='" & txtPenyelia.Text & "', Emel='" & txtEmel.Text & "', NoBilik='" & txtBilik.Text & "', Kemudahan='" & txtKemudahan.Text & "', StatusPelajar='" & txtStatus.Text & "', bilikid='" & txtBid.Text & "' WHERE PelajarID ='" & UserID & "'"


tp error cam tu gak..


--------------------
P[a]K[a]iL[a]H H[e]LmE[t] iN[g]A[t]LaH oR[a]Ng Y[a]Ng T[e]Rs[a]Y[a]Ng...
Go to the top of the page
 
+Quote Post
DrASAG
post Jun 2 2008, 03:39 PM
Kiriman #20


Ahli
***

Grup: Members
Kiriman: 167
Penyertaan: 20-June 07
Dari: Kuala Lumpur
Ahli ke- 31,684



kalo data type mismatch, check tgk data type utk variable tu betul ker tak. command dah ok rasanya.

try tukar yg kat

CODE
objcommand.Parameters.AddWithValue("@sNama", txtNama.Text)
:
:


jadik

CODE
objcommand.Parameters.Add(New SqlParameter("@sNama", txtNama.Text))
:
:


New SqlParameter tu tukar la sebab sy pakai sql server, kalo access jadik pa aeik... New OledbParameter kot.... hehehe

takpon leh try wat

CODE
obj = "UPDATE Pelajar SET Nama=?, NoMatrik=?, NoTel=?, Program=?, Penyelia=?, Emel=?, NoBilik=?, Kemudahan=?, StatusPelajar=?, bilikid=? WHERE PelajarID ='" & UserID & "'"

objcommand = New Data.OleDb.OleDbCommand(obj, conn)

        objcommand.Parameters.AddWithValue("Nama", txtNama.Text)
        objcommand.Parameters.AddWithValue("NoTel", txtNoTel.Text)
        objcommand.Parameters.AddWithValue("NoMatrik", txtNoMatrik.Text)
        objcommand.Parameters.AddWithValue("Program", txtProgram.Text)
        objcommand.Parameters.AddWithValue("Penyelia", txtPenyelia.Text)
        objcommand.Parameters.AddWithValue("Emel", txtEmel.Text)
        objcommand.Parameters.AddWithValue("NoBilik", txtBilik.Text)
        objcommand.Parameters.AddWithValue("Kemudahan", txtKemudahan.Text)
        objcommand.Parameters.AddWithValue("StatusPelajar", txtStatus.Text)
        objcommand.Parameters.AddWithValue("bilikid", txtBid.Text)






----------