 |
| |
[VB.Net] For วน เพื่อ Insert ระยะวันที่ตามที่เลือก |
| |
 |
|
|
 |
 |
|
ในลูป for ให้เพิ่มวันด้วย DateTime.AddDay(Integer) ครับ ซึ่งต้องแปลงเป็น datetime ก่อนถึงจะใช้ method นี้ได้
ปล. เป็นผมไม่วนลูปหรอกเสียเวลา ผมใช้ dataadapter ทีเดียวจบ แต่ขอให้มี datatable ก่อนเท่านั้นเอง
|
 |
 |
 |
 |
| Date :
2010-09-28 16:09:06 |
By :
tungman |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
| |
|
|
|
| |
|
ใช้ dataadapter ในการ insert ได้ด้วยหรอคะ??? (ถามด้วยใจอันใสซื่อ > w <)
แล้ว datatable ใช่ table ที่อยู่ในฐานข้อมูลหรือเปล่าคะ?? (อันนี้ไปหาอ่านใน google มา เข้าใจแบบนี้ แต่ไม่รุถูกป่าว เหอๆ)
|
ประวัติการแก้ไข
2010-09-28 16:16:35
| |
|
|
| |
| Date :
2010-09-28 16:16:08 |
By :
akura |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
datatable คือ ตารางที่อยู่ใน memory มี type มี data เหมือนใน database ใช้สะดวก
ไม่ต้อง query บ่อยให้กิน resource database server
สามารถสร้างเอาเองก็ได้ ไม่จำเป็นต้อง query จาก database อย่างเดียว
|
| |
|
|
| |
| Date :
2010-09-28 16:21:48 |
By :
tungman |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
- -" ไม่ค่อยเกทเท่าไหร่ แต่จะพยายามศึกษาเพิ่มเติมนะคะ
แต่ถ้าจะใช้ dataadapter ต้องมี datatable ก่อน ใช่มั้ยคะ?
แต่ว่าๆ DateTime.AddDay(Integer) ตรง Integer ที่อยู่ในวงเล็บนี่ ใช่ตัวเลขที่เพิ่มเวลาวนลูปหรือเปล่าคะ???
|
| |
|
|
| |
| Date :
2010-09-28 16:29:49 |
By :
akura |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
อ่าน
ถาม
ทดลอง
วิเคราะห์
เข้าใจ
ทำได้
ไม่ลืม
|
| |
|
|
| |
| Date :
2010-09-28 20:33:09 |
By :
tungman |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
เยี่ยม
|
| |
|
|
| |
| Date :
2010-09-29 08:57:12 |
By :
akura |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ใช้ AddDays ทำได้แล้วคะ ขอบคุณค่ะ
แต่ตอนนี้ติดปัญหาเรื่องการสื่อสาร อธิบายให้ชาวบ้านเข้าใจอยู่ 555+
ไม่รู้จะอธิบายคำว่า เพิ่มจำนวนวันที่ตามจำนวนลูปยังไง เอิ๊กส์ๆ (บอกเล่าให้ฟังเฉยๆ ค่ะ ^^)
ขอบคุณนะคะ
|
| |
|
|
| |
| Date :
2010-09-29 10:34:51 |
By :
akura |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
เอาเป็นว่าประมาณนี้ละกันนะคะ
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 |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
แล้วใช้แบบนี้ จะมีโอกาสเกิดข้อผิดพลาดมั้ยอะคะ?
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 |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
SetDate = StartDate.AddDays(i).date << ^3^ เขียนสั้นๆแบบข้างล่างได้ค่ะ
SetDate = StartDate.AddDays(i)
ในการเขียนจะเห็นได้ว่าจะทำได้มากกว่าหนึ่งวิธี ขอแนะนำให้ใช้วิธีที่เราเข้าและคนอื่นเข้าใจค่ะ
|
| |
|
|
| |
| Date :
2010-09-29 11:17:36 |
By :
blurEyes |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
ขอบคุณมากค่ะ ^^
|
| |
|
|
| |
| Date :
2010-09-29 11:27:13 |
By :
akura |
|
|
| |
|
|
|
|
|
| |
|
|
|
| |
|
|
|
| |
|
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 :
นักศึกษา มทรก.คับ |
|
|
| |
|
|
|
|
|
| |
|
|
|
|
|
