Forgot Password ??

PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone

	Registered : 109,037

HOME > .NET Framework > Forum > รบกวนเข้ามาดู Error ที่คับ VB.net แนะนำทีคับ........

รบกวนเข้ามาดู Error ที่คับ VB.net แนะนำทีคับ........

เริ่มหัวข้อใหม่

NewNew

โพสกระทู้ ( 21 )
บทความ ( 0 )

อยากทราบว่าทำไมไม่สามารถอ่านค่า เข้ามาเก็บในตัวแปรได้อะคับ

Code (VB.NET)

 comm = New SqlCommand("SELECT Assistant_General_ID from P_D_Assistant_Station_Position where Assistant_General_ID = '2'", conn)
            MsgBox(readid)
            dd = comm.ExecuteReader()
            dd.Read()
            
            strRegion = dd.Item(0).ToString
            dd.Close() ' ต้องปิดทุกครั้ง
            MsgBox(strRegion)

Tag : .NET, VB.NET, VS 2008 (.NET 3.x)

Date : 2015-07-10 12:45:50

By : aphisit007

View : 797

Reply : 6

No. 1

TOR_CHEMISTRY

โพสกระทู้ ( 4,440 )
บทความ ( 23 )

ไม่ดักจับมันเรอะครับ
ว่าให้ return เมื่อ count >0

ไม่ง้นถ้า dd ไม่มีข้อมูลมันจะ Error นา

Date : 2015-07-10 13:12:01

By : lamaka.tor

No. 2

NewNew

โพสกระทู้ ( 21 )
บทความ ( 0 )

ใช่คับ ดักไงหรอคับ มือใหม่แนะนำทีคับ
Code (VB.NET)

  'อ่านข้อมูลใส่ตัวแปร
            Dim dd As SqlDataReader
            Dim comm As New SqlCommand
            Dim IDtext = txt_assistant_id_new.Text

            comm = New SqlCommand("SELECT Assistant_General_ID from P_D_Assistant_Station_Position where Assistant_General_ID = '" & IDtext & "'", conn)

            dd = comm.ExecuteReader()
            dd.Read()
            MsgBox("IDtext=" & IDtext)
            MsgBox("IDtextitem=" & dd.Item(0).ToString)
            If IDtext = dd.Item(0).ToString Then
                MessageBox.Show("รหัสซ้ำ", "คำเตือน", MessageBoxButtons.OK, MessageBoxIcon.Warning)
            Else

            End If

            dd.Close() ' ต้องปิดทุกครั้ง

ประวัติการแก้ไข
2015-07-10 14:03:09

Date : 2015-07-10 14:01:03

By : aphisit007

No. 3

TOR_CHEMISTRY

โพสกระทู้ ( 4,440 )
บทความ ( 23 )

ผมก็ไม่ถนัดเหมือนกัน ผมใช้ data wizard มันง่ายดีไม่ปวดหัวกะ SQL ด้วย(เอาเวลาไปตกแต่ง โน่น นี่ นั่น ได้ อีก 555)
แต่ก็คงประมาณ

Code (VB.NET)

if  dd.HasRows then 
  MsgBox("IDtextitem=" & dd.Item(0).ToString)
end if 

dd.Close()

ประมาณนี้มั้ง

Date : 2015-07-10 14:13:19

By : lamaka.tor

No. 4

Balll2iFFer

โพสกระทู้ ( 374 )
บทความ ( 0 )

วัตถุประสงค์ จะทำอะไรครับ Login หรือป่าว

Date : 2015-07-10 14:46:15

By : nameball

No. 5

NewNew

โพสกระทู้ ( 21 )
บทความ ( 0 )

ไม่ใช่คับ
ตรวจสอบกับ ค่าใน table คับ
ไม่ให้ insert รหัสซ้ำ

Date : 2015-07-10 16:51:50

By : aphisit007

No. 6

Balll2iFFer

โพสกระทู้ ( 374 )
บทความ ( 0 )

ตอบความคิดเห็นที่ : 5 เขียนโดย : aphisit007 เมื่อวันที่ 2015-07-10 16:51:50

รายละเอียดของการตอบ ::

อ่อ จะเพิ่มรหัส แต่ไม่ให้มันซ้ำอย่างนั้นเหรอครับ

ใช้ Query เช็คครับ
Code (VB.NET)

dim i as integer 

str = "SELECT COUNT(รหัส) AS key FROM [tablename] WHERE id ='"&txtid.text&"'"
con.open()
cm = new sqlcommand(str,connect)
i = cm.executescare
con.close()
if i > 0 then ' ตรวจแล้ว ถ้ามีจริง
messagebox.show("รหัสซ้ำ ไม่ให้บันทึก")
else
'บันทึกได้
end if

ประวัติการแก้ไข
2015-07-11 23:26:14

Date : 2015-07-11 23:25:41

By : nameball

ค้นหาข้อมูล

แสดงความคิดเห็น

Re : รบกวนเข้ามาดู Error ที่คับ VB.net แนะนำทีคับ........

รายละเอียด

เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง

โดย

อีเมล์

บวกค่าให้ถูก