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,037

HOME > .NET Framework > Forum > [VB.Net] For วน เพื่อ Insert ระยะวันที่ตามที่เลือก



 

[VB.Net] For วน เพื่อ Insert ระยะวันที่ตามที่เลือก

 



Topic : 049463



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



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



ตอนนี้กำลังทำให้ Insert ตามวันที่เลือก อย่างเช่น เลือกตั้งแต่วันที่ 10/9/2553 ถึง 12/9/2553

วันที่ต้องเข้าไปในฐานข้อมูลคือ วันที่ 10/9/2553 , 11/9/2553 และ 12/9/2553

โดยใช้วิธี for ให้วน loop แล้วเพิ่มจำนวนวัน ซึ่งทำได้แล้ว แต่ว่า (ปัญหามันอยู่หลังแต่นี่แหละ)



ในกรณีที่เลือกเป็นระหว่างเดือน อย่างเลือกตั้งแต่วันที่ 29/9/2553 ถึง 1/10/2553

โดย loop นับได้ทั้งหมด 2 ครั้ง (ถือว่าถูก) แต่ว่ามันนับวัน เดือน ไม่ถูก

คือมันเพิ่มในฐานข้อมูลคือ 29/9/2553, 30/9/2553 และ 31/9/2553 (<<< มีวันที่ 31 เดือน 9 ด้วย!!!)




ประเด็นคือ ไม่รู้จะเขียนยังไง ให้มันรู้ว่า พอถึงสิ้นเดือน ต้องปัดเดือนเพิ่ม หนึ่งเดือน แล้ววันที่ต้องเป็นเลข 1 แทน

ขอความกรุณาด้วยค่ะ >/\<


ถ้างงกับคำถาม ก็ขออภัยค่ะ =/\=



Tag : .NET, VBScript







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2010-09-28 15:28:40 By : akura View : 2513 Reply : 12
 

 

No. 1



โพสกระทู้ ( 3,144 )
บทความ ( 1 )

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

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


ในลูป for ให้เพิ่มวันด้วย DateTime.AddDay(Integer) ครับ ซึ่งต้องแปลงเป็น datetime ก่อนถึงจะใช้ method นี้ได้

ปล. เป็นผมไม่วนลูปหรอกเสียเวลา ผมใช้ dataadapter ทีเดียวจบ แต่ขอให้มี datatable ก่อนเท่านั้นเอง






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-28 16:09:06 By : tungman
 


 

No. 2



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



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

ใช้ dataadapter ในการ insert ได้ด้วยหรอคะ??? (ถามด้วยใจอันใสซื่อ > w <)

แล้ว datatable ใช่ table ที่อยู่ในฐานข้อมูลหรือเปล่าคะ?? (อันนี้ไปหาอ่านใน google มา เข้าใจแบบนี้ แต่ไม่รุถูกป่าว เหอๆ)


ประวัติการแก้ไข
2010-09-28 16:16:35
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-28 16:16:08 By : akura
 

 

No. 3



โพสกระทู้ ( 3,144 )
บทความ ( 1 )

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

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


datatable คือ ตารางที่อยู่ใน memory มี type มี data เหมือนใน database ใช้สะดวก

ไม่ต้อง query บ่อยให้กิน resource database server

สามารถสร้างเอาเองก็ได้ ไม่จำเป็นต้อง query จาก database อย่างเดียว
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-28 16:21:48 By : tungman
 


 

No. 4



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



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

- -" ไม่ค่อยเกทเท่าไหร่ แต่จะพยายามศึกษาเพิ่มเติมนะคะ

แต่ถ้าจะใช้ dataadapter ต้องมี datatable ก่อน ใช่มั้ยคะ?


แต่ว่าๆ DateTime.AddDay(Integer) ตรง Integer ที่อยู่ในวงเล็บนี่ ใช่ตัวเลขที่เพิ่มเวลาวนลูปหรือเปล่าคะ???
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-28 16:29:49 By : akura
 


 

No. 5



โพสกระทู้ ( 3,144 )
บทความ ( 1 )

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

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


อ่าน
ถาม
ทดลอง
วิเคราะห์
เข้าใจ
ทำได้
ไม่ลืม
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-28 20:33:09 By : tungman
 


 

No. 6



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



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

เยี่ยม
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-29 08:57:12 By : akura
 


 

No. 7



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



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

ใช้ AddDays ทำได้แล้วคะ ขอบคุณค่ะ

แต่ตอนนี้ติดปัญหาเรื่องการสื่อสาร อธิบายให้ชาวบ้านเข้าใจอยู่ 555+

ไม่รู้จะอธิบายคำว่า เพิ่มจำนวนวันที่ตามจำนวนลูปยังไง เอิ๊กส์ๆ (บอกเล่าให้ฟังเฉยๆ ค่ะ ^^)


ขอบคุณนะคะ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-29 10:34:51 By : akura
 


 

No. 8



โพสกระทู้ ( 1,603 )
บทความ ( 1 )



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


เอาเป็นว่าประมาณนี้ละกันนะคะ

Code (VB.NET)
Dim FromDate As DateTime = New DateTime( 2010 ,9 ,29 )
Dim ToDate  As DateTime = New DateTime( 2010 ,10 ,3 )
Dim CountDate As DateTime = FromDate 

While ( Not CountDate.Equals(ToDate  ) )
    ......
    ......
   CountDate = CountDate.AddDays(1)
End While


โพสตอบแต่ลืมกด submit ถ้าได้แล้วก้อยินดีด้วยค่ะ


ประวัติการแก้ไข
2010-09-29 10:49:26
2010-09-29 11:18:24
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-29 10:43:56 By : blurEyes
 


 

No. 9



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



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

แล้วใช้แบบนี้ จะมีโอกาสเกิดข้อผิดพลาดมั้ยอะคะ?

Code (VB.NET)
Dim NumDay As Timespan
NumDay = EndDate.date - StartDate.date

Dim i As Integer
for i = 0 to val(NumDay.Day)

Dim SetDate As Date
SetDate = StartDate.AddDays(i).date

......[คำสั่ง Insert ข้อมูล]......

Next


แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-29 10:53:59 By : akura
 


 

No. 10



โพสกระทู้ ( 1,603 )
บทความ ( 1 )



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


SetDate = StartDate.AddDays(i).date << ^3^ เขียนสั้นๆแบบข้างล่างได้ค่ะ
SetDate = StartDate.AddDays(i)

ในการเขียนจะเห็นได้ว่าจะทำได้มากกว่าหนึ่งวิธี ขอแนะนำให้ใช้วิธีที่เราเข้าและคนอื่นเข้าใจค่ะ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-29 11:17:36 By : blurEyes
 


 

No. 11



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



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

ขอบคุณมากค่ะ ^^
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-09-29 11:27:13 By : akura
 


 

No. 12

Guest


Dim CurrentFileName, NewFileName As String
Dim ExtFile As String '//นามสกุล
Dim CurrentPath As String = Server.MapPath("~/Video/Product/")

If Not (FilePic.HasFile) Then

Else
CurrentFileName = FilePic.FileName
ExtFile = (Path.GetExtension(CurrentFileName)).ToLower()
NewFileName = "P" + txtid.Text + ExtFile
'//ชนิดข้อมูล
If ((ExtFile <> ".flv") And (ExtFile <> ".avi")) Then
'//ชนิดชองไฟล์ไม่ใช่ .Jpg และ .Gif
MsgBox("You choose the file Extension in .flv .avi !!!")
Exit Sub
End If '//end of if ((ExtFile <> ".flv") && (ExtFile <> ".avi"))
'//ขนาดไฟล์
If (FilePic.PostedFile.ContentLength > 131072) Then
'//ขนาดไฟล์มีขนาดมากกว่า 128 Kb(128*1024 =131072 Byte)
MsgBox("The size of big too file,the size of the file must 128 KB not exceed!!! ")
Exit Sub
End If '//end of If (FilePic.PostedFile.ContentLength > 131072) Then
'//Upload
If (FilePic.HasFile) Then
CurrentPath += NewFileName '//ไฟล์ใหม่ที่ต้องการให้มีในเซิร์ฟเวอร์
FilePic.SaveAs(CurrentPath) '//การอัฟโหลดไฟล์
'MsgBox("Upload the file already !!!")
Else
MsgBox("Can not load the file !")
Exit Sub
End If '//end of else if (FileUpload1.HasFile)
End If
ผมจะอัปโหลดวีดีโออะคับจะบันทึกลงSql แต่ไม่ลงคับเลยขอความช่วยเหลือหน่อยคับหรือว่ามีโค้ดอื่นที่เพิ่มวีดีโอลงฐานข้อมูลได้คับ VB.net 2008 คับขอบคุณล่วงหน้าคับ
แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2010-11-09 01:53:40 By : นักศึกษา มทรก.คับ
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : [VB.Net] For วน เพื่อ Insert ระยะวันที่ตามที่เลือก
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ 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 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: นำเข้าสินค้าจากจีน, Taobao, เฟอร์นิเจอร์, ของพรีเมี่ยม, ร่ม, ปากกา, power bank, แฟลชไดร์ฟ, กระบอกน้ำ

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