Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,038

HOME > .NET Framework > Forum > ขอสอบถามเรื่องการ Insert วันที่หน่อยครับ ผมใช้ vb.net + ms sql ต้อง convert ยังไงครับ


 

[.NET] ขอสอบถามเรื่องการ Insert วันที่หน่อยครับ ผมใช้ vb.net + ms sql ต้อง convert ยังไงครับ

 
Topic : 129693



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



สถานะออฟไลน์
Facebook


ขอสอบถามเรื่องการ Insert วันที่หน่อยครับ ใช้ vb.net + ms sql
ที่ ตาราง วันที่ เป็นชนิด Date

Code (VB.NET)
view source
print?
01.Private Sub SaveBt_Click(sender As Object, e As EventArgs) Handles SaveBt.Click
02.    Dim conn As SqlConnection
03.    Dim cmd As SqlCommand
04.    Dim Sql As String
05. 
06.    Try
07.        conn = New SqlConnection("Data Source=MAINCREDIT00\sqlexpress;Initial Catalog=RayongDB;Integrated Security=True")
08.        conn.Open()
09.        Sql = "SELECT * FROM Billcane"
10.        Sql = "Insert into Billcane(W_numb,Quota,Name,Car_numb,C_point,Type_cane,P_Cane,W_cane,M_cane,Money,Fuel,P_fuel,M_fuel,Weight,Date_in)
11.                Values(@W_numb,@Quota,@Name,@Car_numb,@C_point,@Type_cane,@P_Cane,@W_cane,@M_cane,@Money,@Fuel,@P_fuel,@M_fuel,@Weight,@Date_in)"
12. 
13.        cmd = New SqlCommand(Sql, conn)
14.        cmd.Parameters.Add("@W_numb", SqlDbType.NVarChar).Value = Me.Wnbox.Text
15.        cmd.Parameters.Add("@Quota", SqlDbType.NVarChar).Value = Me.Quotabox.Text
16.        cmd.Parameters.Add("@Name", SqlDbType.NVarChar).Value = Me.Namebox.Text
17.        cmd.Parameters.Add("@Car_numb", SqlDbType.NVarChar).Value = Me.Licenbox.Text
18.        cmd.Parameters.Add("@C_point", SqlDbType.NVarChar).Value = Me.C_pbox.Text
19.        cmd.Parameters.Add("@Type_cane", SqlDbType.NVarChar).Value = Me.Typebox.Text
20.        cmd.Parameters.Add("@P_cane", SqlDbType.Decimal).Value = Val(P_cbox.Text)
21.        cmd.Parameters.Add("@W_cane", SqlDbType.Decimal).Value = Val(W_cbox.Text)
22.        cmd.Parameters.Add("@M_cane", SqlDbType.Decimal).Value = Val(M_cbox.Text)
23.        cmd.Parameters.Add("@Money", SqlDbType.Decimal).Value = Val(M_box.Text)
24.        cmd.Parameters.Add("@Fuel", SqlDbType.Decimal).Value = Val(F_box.Text)
25.        cmd.Parameters.Add("@P_fuel", SqlDbType.Decimal).Value = Val(P_fbox.Text)
26.        cmd.Parameters.Add("@M_fuel", SqlDbType.Decimal).Value = Val(M_fbox.Text)
27.        cmd.Parameters.Add("@Weight", SqlDbType.Decimal).Value = Val(W_box.Text)
28.        cmd.Parameters.Add("@Date_in", SqlDbType.Date).Value.getdate() = DatePicker.Value
29. 
30.        cmd.ExecuteNonQuery()
31.        conn.Close()
32.        MessageBox.Show("Completed!")
33.    Catch ex As Exception
34.        MessageBox.Show("Error while connecting to SQL Server." & ex.Message)
35. 
36.    End Try
37.End Sub


ติดตรงวันที่ cmd.Parameters.Add("@Date_in", SqlDbType.Date).Value.getdate() = DatePicker.Value
ไม่รู้ผมทำถูกรึเปล่า
#มือใหม่หัดเขียน



Tag : .NET, Ms SQL Server 2014, VBScript, Win (Windows App), VB.NET
Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2017-12-13 12:00:53 By : Jackiecooper View : 995 Reply : 7
 

 

No. 1



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



สถานะออฟไลน์
Facebook

ตามนี้ครบั

Code (VB.NET)
view source
print?
01.Private Sub btnSave_Click(sender As Object, e As EventArgs)
02.    Dim strConnString As String = "Server=localhost;User Id=root; Password=root; Database=mydatabase; Pooling=false"
03. 
04.    Dim objConn = New MySqlConnection(strConnString)
05.    objConn.Open()
06. 
07.    Dim strSQL As String = "INSERT INTO myTable (EmpCode,EmpName,CheckIn,CheckOut) " + " VALUES  (?EmpCode,?EmpName,?CheckIn,?CheckOut)"
08. 
09.    Dim objCmd = New MySqlCommand(strSQL, objConn)
10.    objCmd.Parameters.Add("?EmpCode", MySqlDbType.VarChar).Value = Me.txtEmpCode.Text
11.    objCmd.Parameters.Add("?EmpName", MySqlDbType.VarChar).Value = Me.txtEmpName.Text
12.    objCmd.Parameters.Add("?CheckIn", MySqlDbType.DateTime).Value = Me.dtCheckIn.Value
13.    objCmd.Parameters.Add("?CheckOut", MySqlDbType.DateTime).Value = Me.dtCheckOut.Value
14.    objCmd.ExecuteNonQuery()
15. 
16.    objConn.Close()
17. 
18.    MessageBox.Show("Completed!")
19.End Sub


https://www.thaicreate.com/community/windows-form-add-insert-table.html
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2017-12-13 12:20:46 By : lamaka.tor
 

 

No. 2



โพสกระทู้ ( 9,590 )
บทความ ( 2 )



สถานะออฟไลน์


น่าจะเป็นแบบนี้หรือเปล่า
cmd.Parameters.Add("@Date_in", SqlDbType.Date).Value = DatePicker.Value

ไม่ต้อง .getdate()
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2017-12-13 13:45:19 By : Chaidhanan
 

 

No. 3

Guest


ตอบความคิดเห็นที่ : 2 เขียนโดย : Chaidhanan เมื่อวันที่ 2017-12-13 13:45:19
รายละเอียดของการตอบ ::
โค้ดไม่ error แต่ ขึ้นที่ฟอร์มแทน

พอกดเพิ่มปุ๊ป ขึ้นแบบนี้เลยครับ

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2017-12-13 14:52:48 By : Jackie_Cooper
 

 

No. 4

Guest


ได้แล้วครับ
ใช้แบบนี้เอา
cmd.Parameters.AddWithValue("@Date_in ", DateTime.Now);


ขอบคุณทุกท่านมากเลยครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2017-12-13 15:46:58 By : Jackie_Cooper
 

 

No. 5



โพสกระทู้ ( 9,590 )
บทความ ( 2 )



สถานะออฟไลน์


หรือแบบนี้ น่าจะต้อง convert DateTime เป็น Date

Code (VB.NET)
view source
print?
1.cmd.Parameters.Add("@Date_in", SqlDbType.Date).Value = New Date(DatePicker.Value.Year, DatePicker.Value.Month, DatePicker.Value.Day);
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2017-12-13 15:49:19 By : Chaidhanan
 

 

No. 6

Guest


เหลือแค่ปุ่ม แก้ไข กับลบ แล้วก็รายงาน
อยากได้ตัวอย่าง โค้ด พอจะมีบ้างมั้ยครับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2017-12-13 21:23:44 By : jackie_cooper
 

 

No. 7



โพสกระทู้ ( 74,059 )
บทความ ( 838 )

สมาชิกที่ใส่เสื้อไทยครีเอท

สถานะออฟไลน์
Twitter Facebook


แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2017-12-14 11:25:14 By : mr.win
 

   

ค้นหาข้อมูล
   
 

แสดงความคิดเห็น
Re : ขอสอบถามเรื่องการ Insert วันที่หน่อยครับ ผมใช้ vb.net + ms sql ต้อง convert ยังไงครับ
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
 Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

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

Notice

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

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)





ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2025 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่