Public Function GetFileNameFromPath(path As String) As String
Dim fileName As String
fileName = Dir(path)
If Len(fileName) > 0 Then
GetFileNameFromPath = fileName
Else
GetFileNameFromPath = "File not found"
End If
End Function
Category: Uncategorized
vba ลบโฟลเดอร์กับไฟล์ข้างในทั้งหมด
Public Function DeleteFolder(ByVal folderPath As String) As Boolean
On Error Resume Next
Dim fso As Object
Set fso = CreateObject("Scripting.FileSystemObject")
If fso.FolderExists(folderPath) Then
fso.DeleteFolder folderPath, True
DeleteFolder = True
Else
DeleteFolder = False
End If
Set fso = Nothing
End Function
โตเกียว รีเวนเจอร์ส
อ่านโตเกียวรีเวนเจอร์สใหม่ตั้งแต่ต้นรอบที่สี่ได้แล้วมั้ง คือแม่งตัวละครเยอะ แล้วเสือกเปลี่ยนทรงผม เปลี่ยนไปเปลี่ยนมา จำว่าใครเป็นใครยากโคตรๆ ออกเล่มใหม่ที มาอ่าน ก็งงว่าไอ้นี่ใครวะ เลยใช้วิธีหมกไว้หลายๆเล่ม แล้วค่อยมาอ่านย้อนทีหนึง ปัจจุบันถึงเล่ม 29 ละ ว่ากันว่า มันเป็นภาคสุดท้ายแล้วจริงๆ
ปัญหาเดียวกับวันพีชเลย คือแม่งผ่านจุดที่สนุกสุดๆ แบบควรจะอวสานไปตั้งแต่ตอนนั้นแล้ว แต่คงเจอแบบ slamdunk หรือเปล่าไม่รู้ ที่สนพ. มาขอให้วาดต่อ แต่รายนั้นเค้าใจแข็งไง ตัดจบให้มันเป็นตำนานไป แต่เรื่องนี้ อาจารย์แกคงรู้ว่า ตำนานมันกินไม่อิ่มท้อง กูเขียนมาขายต่อนี่แหละ อิ่มไปได้อีกหลายสิบปี
ภาคจบ บทมันเลยอ่อนมาก แบบอะไรของมึงวะ เพิ่มตัวละครใหม่มาอีกครึ่งโหลได้ ใช้แล้วทิ้ง ตอนต้นๆก็ยังโอเค มันฉาบด้วยความเศร้า เศร้าแบบเหตุผลอ่อนๆนี่แหละ แต่เออ ก็เศร้าแหละ โอเค ดี ชอบ ก็คนมันรัก รักมาตั้งยี่สิบกว่าเล่มแล้ว จะให้เกลียด ก็แปลกๆหรือเปล่า แต่อยู่ดีๆ ความนิยมตกหรือยังไงมิทราบ ผู้ดูแลคงเดินไปสะกิดอาจารย์ว่า จารย์ๆ คนอ่านเริ่มด่าแล้วนะ ขอมันส์ๆ กระตุ้นยอดหน่อย แม่งเลยกลายเป็นการ์ตูนหมัดหนักโดยสมบูรณ์ไปเลย อีห่า ชกกันสี่ห้าเล่มยาวๆเลย หาวไปนิดหน่อย แต่พอมาเล่ม 29 ได้อารณ์แบบดูขุนพันธ์ภาค 2 (ภาคสามยังไม่ได้ดู) แม่ง มั่วจนมัน เออ มันดี ยัดไรได้ยัดมาเลย เริ่มหนุกละ เล่มหน้า ขอให้จบไปเลยนะ อย่ายืดเยอะ เดี๋ยวกราฟตก เอาให้มันๆ แล้วจบไปเลย อย่างน้อยตำนานหมัดหนักก็ยังดีวะ
หมอเจ็บ
ช่วงที่ผ่านมา คุมอาหารไม่อยู่เลย กินหวานเละเทะ ล่าสุด สั่งเนื้อทอดเทวxx มา 4 กิน 2 เค็มจัดๆ
วันนี้ไปหาหมอตรวจเลือด ตรวจฉี่ โดนหมอด่าเละเทะ 55 อันตรายต่อหัวใจ ไต มากกก ค่าไตกระโดดสูงสุดๆ
และตอนนี้เป็นบ้าไรไม่รู้ ก้าวขาไม่ค่อยพ้นเบาะมอไซต์ พอลงทีไร ขามันจะไปขูดกับเบาะ เป็นแผล วงกลมๆ หนังเปิด เท่าหัวนิ้วชี้ สามสี่แผลติดต่อกัน เหมือนแรงในการเหวี่ยงขามันน้อยกว่าเดิม โทษดวงละกัน
ทำบุญแก้ชงหน่อยละกัน แล้วนึกขึ้นมาได้ว่าเคยอยากทำบุญให้มูลนิธิกระจกเงา เลยแอดไลน์ไปขอเบอร์บัญชี พอโอนปั้บ เค้าบอกขอสลิป ถ้าโอนในนามแฟนคลับ จะทวิตให้ด้วย
เฮ้ยดี แต่มันคิดไม่ทัน เลยกลายเป็นอันนี้
ตอนแรกกะเอารูปกวนตีนๆ แต่กลัวเจ้าตัวด่า เอาแค่นี้ละกัน 555
interstellar รอบที่ร้อย
นั่งดูอีกรอบ ก็ยังชอบอยู่ดี ชอบความซับซ้อนของเวลา ความมองมิติเวลาไปอีกรูปแบบหนึง ชอบทุกๆอย่าง รักความโนแลน เก่งชิบหายคนอะไร
เพลงที่ชะงัก
จริงๆ เพลงนี้เป็นเพลงที่ชอบมาตั้งแต่เด็ก ร้องได้มาตั้งแต่เด็ก ตอนนั้นซื้อเทปมาฟังแค่ ลมหนาว แต่ไม่รู้ทำไม ฟังเพลงนี้แล้วชอบมากๆ ชอบในทำนอง เมโลดี้
แล้วก็ลืม ไม่ได้ฟังอีกเลย
ตะกี้ยูทูปนึกยังไงไม่รู้ แรนด้อมมาให้ฟัง
พึ่งได้ฟังเนื้อเพลงแบบตั้งใจฟังครั้งแรก
โอโห้ เหมือนเวลาหยุดหมุน มันโคตรโรแมนติกเลย อาจเพราะเราอินกับความตายมากขึ้น
การได้บอกความรู้สึกกับคนรัก หลังจากที่เราตายไปแล้ว มันคงจะรู้สึกดีมากๆ
สิ่งที่เราบอกไป แต่วันนั้น มันอาจจะแค่คำๆหนึง แต่เรามาย้ำอีกที หลังจากที่เราต้องจากกันตลอดกาล มันคงมีความหมายมากขึ้นไปอีก
ตอนนี้ตีสี่ ฟังเพลงนี้จบ เสียงรอบข้างมันเงียบ ทุกอย่างเหมือนหยุดไปหลังเพลงจบ
อินมาก โรแมนติกมาก น้ำตาไหล
ประสบการณ์ทำให้เราฟังเพลงเพราะขึ้น
Onlyfans vs. คนดี

(อ่านคอมเม้นในรูปจากล่างขึ้นบน)
ถ้ามึงคนดีจริง มึงโอนเงินตรงๆเข้าบัญชีน้อง ไม่ต้องเข้ามากดซับในนี้
เบื่ออีพวกคนดีคนหล่อปลอมจริงๆ กูเสียตัง กูอยากดู อิควัย
ปล. แน่นอน คอมเม้นบนสุดคือตูเอง อิอิ
The dude in me
เห็นคลิปสปอยสั้นๆในติ๊กต่อก เลยลองหามาดู (เถื่อน) สนุกเกินคาด
มาเฟียในเกาหลี เกิดอุบัติเหตุมาสลับร่างกับเด็กหนุ่มอ้วนๆ ขี้แพ้
สนุกดี
Interstellar
เปิดยูทูปทิ้งไว้ มันแรนด้อมไปเรื่อยๆ จนมาเจอคลิปพวกเกี่ยวกับเรื่องของอวกาศ
นั่งดูยาวเลย ไม่รู้ข้อมูลจริงหรือหลอก แต่ก็นั่งฟังแทบจะทุกคลิป
ตอนเด็กๆ จนถึงตอนนี้ ชอบทุกอย่างเกี่ยวกับความลับของอวกาศ
เทพนิยายที่เกี่ยวกับดวงดาว การ์ตูนที่เกี่ยวกับดวงดาว หนังมนุษย์ต่างดาว x-file ต่างๆนานา คือ ชอบหมด ดูได้ไม่มีเบื่อ
เสร็จแล้วสุดท้ายก็นึกถึง Interstellar หนังที่พูดถึงความลับของหลายๆเรื่องที่ยังเป็นเรื่องลี้ลับอยู่
ซึ่งเราโคตรชอบ ตอนดูในโรง ดูแล้วไม่ค่อยเข้าใจในบางเรื่อง อ่านซับไม่ทัน
แต่พอแผ่นออกก็ซื้อแผ่นมานั่งดูที่บ้าน ยิ่งเข้าใจในหลายๆเรื่องมากขึ้น ยิ่งชอบมากขึ้นไปอีก
ตอนนี้อยากดูอีกรอบ แผ่นหายไปไหนแล้วไม่รู้ ร้านขายแผ่นก็คงเจ๊งไปหมดแล้ว ตรงไหนมีให้ดูบ้างหว่า อยากดู
พัง
นัดหมอหัวใจไว้วันพุธที่ 7
แต่มีอาการไม่ค่อยดี เลยไปหาหมอก่อน ตามที่เคยเล่าไป
หารอบแรก มาวันศุกร์ เจอหมอทั่วไป หมอหัวใจไม่เข้า เจอว่าปอดติดเชื้อ ให้ยาฆ่าเชื้อมากิน แล้วบอกว่าถ้าสามวันไม่หาย ให้มาหาใหม่
แล้วก็ไม่หาย เลยมาใหม่วันพุธเพราะหมอหัวใจเข้า ซวย วันนั้น หมอดันไม่เจ้าอีก ก็เลยได้หมอทั่วไปมาตรวจอีกรอบ
พอมาวันนี้ ตื่นเที่ยงๆ กำลังไปร้านการ์ตูน เปิดแอปนัดหมอขึ้นมาดู อ้าว วันที่ 7 มันวันนี้นี่หว่า นึกว่าวันพุธ นี่ก็บ่ายสองแล้ว ไม่ทันแน่เลย
พยายามโทรหาศิริราช ไม่ติดเลย ก็เลยตัดสินใจ นั่งรถไปที่โรงบาลเลย เพื่อทำนัดใหม่ ให้เร็วที่สุด
พอไปถึงเค้าเตอร์ เล่าให้พยาบาลฟัง เค้าก็บอกว่าได้เร็วสุดกันยานะคะ
โห นานไปครับ ยาน่าจะหมดก่อน
พยาบาลก้มดูใบนัดอีกรอบ แล้วเงยหน้ามาพูดเสียงเรียบๆว่า
นี่เดือนมิถุนานะคะ
เชี่ย
หมอนัดเดือน กค กูมาผิดเดือน!!
