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

HOME > ASP > ASP Forum > ขอความรู้ เกี่ยวกับการ ตั้งชื่อรูปภาพ ตอน save ใหม่หน่อยครับ



 

ขอความรู้ เกี่ยวกับการ ตั้งชื่อรูปภาพ ตอน save ใหม่หน่อยครับ

 



Topic : 134879



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



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




Dim consql As String = "Data Source=TCJSRVDB02;Initial Catalog=BussinessApplication;User ID=sa"
Dim connection As New SqlConnection(consql)
If connection.State = ConnectionState.Closed Then
connection.Open()
End If

Dim constr As String = ""

Dim savefolder As String = "R:\MRD\image\"

Dim strFullPath As String = savefolder

Dim dlg As New OpenFileDialog()

If dlg.ShowDialog() = DialogResult.OK Then

'*** Create Folder
If Not Directory.Exists(strFullPath) Then
Directory.CreateDirectory(strFullPath)
End If
If connection.State = ConnectionState.Closed Then
connection.Open()
End If

'*** Save File

Dim filePath As String = dlg.FileName
Dim fileName As String = Path.GetFileName(filePath)
File.Copy(filePath, savefolder & fileName, True)

Dim command = New SqlCommand(constr, connection)


constr = "INSERT INTO pathImage(txtNumber,txtName,txtGroup,txttime,Filename,Filepath,FileSize) " & _
" VALUES (@txtNumber,@txtName,@txtGroup,@txttime,@Filename,@filepath,@fileSize)"

With command
command.Connection = connection
command.CommandText = constr
command.CommandType = CommandType.Text
command.Parameters.AddWithValue("@txtNumber", txtnumber.Text)
command.Parameters.AddWithValue("@txtName", txtname.Text)
command.Parameters.AddWithValue("@txtGroup", combogroup.Text)
command.Parameters.AddWithValue("@txtTime", DateTime.Now)
command.Parameters.AddWithValue("@FileName", txtnameimage.Text)
command.Parameters.AddWithValue("@FilePath", savefolder & fileName)
command.Parameters.AddWithValue("@FileSize", (New FileInfo(filePath).Length) / 1024)
command.ExecuteNonQuery()
End With

MessageBox.Show("อัพโหลดรูปภาพเรียนร้อย")
connection.Close()
showdata()


จาก code ตอนนี้ save ได้ปกติ แต่ ชื่อใน sql และ ชื่อที่เก็บไว้ มันเป็นชื่อตามรูป เลยอยากให้ ตอน save ให้ตั้งชื่อใหม่ครับ
รบกวนด้วยครับ



Tag : ASP, Ms SQL Server 2012, VB.NET, VS 2010 (.NET 4.x), Windows







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2020-02-14 09:20:41 By : chatchawan5897 View : 744 Reply : 2
 

 

No. 1



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



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


Dim fileName As String = Path.GetFileName(filePath) เปลี่ยนตรงนี้เป็นชื่อที่ต้องการ
แนะนำให้ใช้ YmdHisn และนำไปเปลี่ยนที่ database ด้วย

command.Parameters.AddWithValue("@FilePath", savefolder & fileName)






แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2020-02-14 14:51:07 By : Chaidhanan
 


 

No. 2



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



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


ตอบความคิดเห็นที่ : 1 เขียนโดย : Chaidhanan เมื่อวันที่ 2020-02-14 14:51:07
รายละเอียดของการตอบ ::
... ใส่ความคิดเห็นตรงนี้....... ขอบคุณมากครับผม

แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2020-02-14 16:10:05 By : chatchawan5897
 

   

ค้นหาข้อมูล


   
 

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