บทความ

การหาข้อมูลที่ซ้ำกันในตาราง 2 ตาราง ของ Access2010

รูปภาพ
การหาข้อมูลใน Field ที่ซ้ำกันในตารางเดียวกัน เป็นเรื่องไม่ยาก เพราะมี แบบสอบถาม หรือ Query ที่ใช้สำหรับค้นหาข้อมูลที่ซ้ำกันอยู่แล้ว คือ ตัวช่วยสร้างแบบสอบถามเพื่อค้นหารายการที่ซ้ำ (Find Duplicate Query Wizard) (ไปที่แถบสร้าง กลุ่มแบบสอบถาม เลือก ตัวช่วยสร้างแบบสอบถามเพื่อค้นหารายการที่ซ้ำ) และถ้าเป็นการหาข้อมูลที่ซ้ำกันใน 2 ตาราง แต่ต้องการหาเพียงฟิลด์เดียว ก็ไม่ยากเท่าไร เพราะสามารถใช้ ตัวช่วยสร้างแบบสอบถามการค้นหาข้อมูลที่ไม่ตรงกัน (Find Unmatched Query Wizard) ได้ เพียงเปลี่ยนเงื่อนไข จาก is Null เป็น Not is Null ก็ใช้ได้ แต่ ถ้าต้องการหาข้อมูลที่ซ้ำกัน โดยมีเงื่อนไขว่า ต้องซ้ำกันหลายฟิลด์ เช่น ชื่อซ้ำกัน และนามสกุลซ้ำกันด้วย จะทำอย่างไร จากภาพ จะเห็นว่า ในตารางที่ 1 และตารางที่ 2 มีข้อมูลที่ซ้ำกันคือ สมศักดิ์ รักชาติ และ สุดา อารยา ส่วนประสิทธิ์ ชื่อเหมือนกัน แต่นามสกุลต่างกัน จึงเป็นคนละคนกัน การค้นหารายชื่อที่ซ้ำกัน ใน 2 ตาราง โดยมีเงื่อนไขหลายฟิลด์ มีดังนี้ สร้างแบบสอบถามใหม่ โดยไปที่แถบสร้าง กลุ่มแบบสอบถาม เลือกออกแบบแบสอบถาม Query เลือกตารางที่มีข้อมูลที่ต้องการเป

การสร้างปุ่มบนริบบิ้น Access 2010 โดยใช้ภาพที่สร้างขึ้นเอง

รูปภาพ
วันก่อน เคยพูดเรื่อง การสร้างปุ่มบนริบบิ้น ของ MS Access 2007 แต่ยังติดขัดที่ต้องใช้ภาพที่เป็น idMso ของ Access ภาพที่สร้างขึ้นเอง มีปัญหาเรื่อง Transparency วันนี้ ไปพบเรื่องเดียวกัน ที่ http://www.accessribbon.de/en/  แต่สามารถใช้ภาพ png ที่เป็น Transparent และนำมาใช้งาน ได้ และมี Transparency เหมือนกับการใช้ภาพจาก idMso ดังตัวอย่างข้างล่างนี้ การสร้าง ใช้การนำภาพเข้าตาราง และเรียกใช้งานฟังก์ชัน AddBinFile() ของ Sascha Trowitzsch ในโมดูล "basBlob" และ "basGDIPlus" ภาพที่ใช้สร้างเอง โดยใช้โปรแกรมสร้างภาพกราฟฟิก เช่น Gimp Photoshop หรือ Illustrator ก็ได้ และบันทึกเป็นไฟล์ png โดยให้มี Trasparent ด้วย วิธีการ สร้างไฟล์ ขนาด 200 X 200 pixels สำหรับเป็นภาพ icon ที่ต้องการ โดยสร้างเป็นไฟล์ png และให้มี Transparent บันทึกไว้ในห้องเดียวกับไฟล์ Access ในตัวอย่างนี้ ไฟล์ภาพ ชื่อ abc_nfe.png อยู่ในห้อง E:\socialMedia สร้างไฟล์ใหม่ ด้วย Access 2010 และบันทึกไว้ในห้องเดียวกับภาพ คือ E:\socialMedia นำเข้าโมดุล  "basBlob" โดยไปที่ ข้อมูลภายนอก > Acc

การลบ Cookies ใน Internet Explorer

รูปภาพ
Cookies คือ ไฟล์ข้อมูลที่เว็บไซต์บันทึกเก็บไว้ในเครื่องคอมพิวเตอร์ของผู้ใช้ เพื่อวัตถุประสงค์บางอย่าง เช่น จำรหัสสำหรับ login หรือ Password เพื่อให้ความสะดวก เมื่อผู้ใช้เข้ามาในเว็บแล้ว จะได้ไม่ต้องกรอกรหัสอีก ตัวอย่างเช่น Gmail เมื่อเวลา Sign in เข้าใช้งาน จะมีข้อความให้เลือกว่าต้องการ "อยู่ในสถานะลงชื่อเข้าใช้" หรือไม่ ถ้าคลิกเลือก เหมือนในตัวอย่างข้างบน เว็บของ Gmail จะเขียน Cookie ลงในเครื่อง เพื่อว่า เมื่อเข้ามาอีกครั้ง จะได้ไม่ต้องกรอก   เว็บของสถาบัน กศน.ภาคกลาง ก็มีการเก็บ Cookie ในลักษณะนี้ เช่นเดียวกัน ถ้าคลิกเลือก "จำชื่อและรหัสไว้" เมื่อเข้ามาอีกครั้ง ก็ไม่ต้องลงทะเบียนเข้าสู่ระบบ แต่จะสามารถเข้าเลือกวิชาเรียนในระบบได้ทันที   โดยปกติ เว็บที่เขียน Cookie ลงในเครื่องผู้ใช้ จะกำหนดอายุว่า ให้อยู่ได้กี่วัน แล้วจะลบทิ้งไปเอง จำนวนวันจะไม่เท่ากัน แล้วแต่ละเว็บจะกำหนด   ถ้าเราต้องการล้าง Cookies ทั้งหมดที่อยู่เครื่อง ก็สามารถทำได้ โดยใช้โปรแกรม เช่น CCleaner ลบ Cookies ออกทั้งหมด หรือจะทำเอง ก็ได้   วิธีการล้าง Cookies ด้วยตัวเอง ทำดังนี้

การดาวน์โหลดไฟล์จาก อินเทอร์เน็ต ด้วย Access 2010 VBA

รูปภาพ
ก่อนการใช้ MS Access 2010 ดาวน์โหลดไฟล์จากอินเทอร์เน็ต ต้องตรวจสอบเสียก่อนว่า ขณะนี้สามารถเข้าอินเทอร์เน็ตได้หรือไม่ โดยใช้ฟังก์ชันต่อไปนี้ Function checkInternetConnection() As Integer 'code to check for internet connection 'by Daniel Isoje On Error Resume Next  checkInternetConnection = False  Dim objSvrHTTP As ServerXMLHTTP  Dim varProjectID, varCatID, strT As String  Set objSvrHTTP = New ServerXMLHTTP  objSvrHTTP.Open "GET", " http://www.google.com "  objSvrHTTP.setRequestHeader "Accept", "application/xml"  objSvrHTTP.setRequestHeader "Content-Type", "application/xml"  objSvrHTTP.send strT  If Err = 0 Then  checkInternetConnection = True  Else   MsgBox "Internet connection not estableshed: " & Err.Description & "", 64, "Additt !"  End If End Function ฟังก์ชันนี้ ต้องอ้างอิงถึง Microsoft XML, v6.0 เสียก่อน จึงจะใช้งานได้ โดยที่หน้าจอเขียนโค้ด ไปที่ Tool >

การแนบไฟล์ ใน Access 2010

รูปภาพ
เริ่มตั้งแต่ Access 2007 เราสามารถแนบไฟล์ เช่น ไฟล์ Word Excel ไฟล์ภาพ หรือแม้แต่ไฟล์ วิดีโอ ในฟิลด์ตารางของ Access ได้ เพราะมีการกำหนด ประเภทของข้อมูล (data type) เพิ่มเติม เป็นชนิด Attachment ซึ่งดีกว่าการใช้ OLE ในรุ่นก่อน ๆ มาก เพราะสะดวกมากกว่า ไฟล์เล็กกว่า ไฟล์ที่เก็บเป็น Attachment เป็นไฟล์ต้นฉบับ เวลาเปิด จะใช้โปรแกรมภายนอกเปิด เช่น ถ้าเก็บไฟล์ docx เวลาเปิดไฟล์ จะเรียกโปรแกรม MS Word มาเปิด ซึ่งสามารถแก้ไข เพิ่มเติมได้ (แต่มีข้อแม้ว่า เมื่อแก้ไขแล้ว เวลากลับมาที่ MS Access ต้องบันทึกอีกครั้งหนึ่ง มิฉะนั้น สิ่งที่แก้ก็จะยังไม่ถูกจัดเก็บใน MS Access) ไฟล์แนบ หรือ Attachment ช่วยให้เราสามารถเก็บเอกสาร หรือ ไฟล์ที่เกี่ยวข้องกับเรื่องนั้น ๆ ได้ เช่น มีข้อมูลรายการของพนักงานในตาราง พนักงาน เราสามารถแนบเอกสารที่เกี่ยวข้องกับพนักงานแต่ละคน เช่น ไฟล์สัญญาจ้าง ภาพถ่ายลายนิ้วมือ วิดีโอที่เกี่ยวกับพนักงานคนนั้น ๆ เป็นต้น ไฟล์แนบสามารถมีได้ไม่จำกัดจำนวน จำกัดอยู่ที่ขนาดของไฟล์ แต่ละไฟล์ต้องมีขนาดไม่เกิน 256 Mb  รวมกันทั้งหมดแล้ว ไม่เกิน 2 GB (เท่ากับขนาดของ Access) ไฟล์แนบสามารถจัด

การใช้ File Dialog ค้นหาภาพ และเปิดด้วย Paint ด้วย Access VBA

รูปภาพ
ในตัวอย่างนี้ จะเป็นการสร้างปุ่มเพื่อเปิดหน้าจอค้นหาไฟล์ (Browse Dialogue) เพื่อค้นหาไฟล์ภาพ แล้วมีปุ่มเพื่อให้เปิดดูด้วย โปรแกรม Paint เพื่อให้ผู้ใช้สามารถจัดการกับภาพ และสั่งพิมพ์นอกโปรแกรม Access ได้ จุดประสงค์สุดท้ายคือการเรียกไฟล์ Paint มาเปิดภาพ ดังนั้น เราต้องมีการกรอง หรือตรวจเชคว่า ไฟล์ที่เลือกนั้นเป็นไฟล์ภาพหรือไม่ ในตัวอย่างนี้ กำหนดให้เป็นไฟล์ ประเภท jpg หรือ gif เท่านั้น วิธีการ สร้างปุ่ม ชื่อ Command0 เขียนข้อความที่ปุ่มเป็น ค้นหาไฟล์ สร้าง กล่องข้อความ (Textbox) ชื่อ Text3 สร้างปุ่ม ชื่อ cmdViewFile กำหนดค่าเริ่มต้นให้มองไม่เห็น (ที่แถบ Format ตั้งค่า Visible เป็น No)  เขียนข้อความที่ปุ่มเป็น เปิดดูภาพ ที่ปุ่ม ค้นหาไฟล์ (Command0) ให้เขียนโค้ดข้างล่างนี้ Private Sub Command0_Click()     Dim f As Object     Dim fileAddress As String     Dim fileExt As String     Dim strFile As String     Dim strFolder As String     Dim varItem As Variant         Me.Text3.Value = ""     Me.cmdViewFile.Visible = False         Set f = Application.FileDialog(3)     f.A

อาการป่วยธรรมดา อาจจะไม่ธรรมดา

รูปภาพ
โรค ... 6 อาการผิดปกติธรรมดา ที่ไม่ธรรมดา   โรคที่ไม่มีอาการ พบเสมอ ดังนั้นหากมีอาการ ควรตรวจหาสาเหตุ ซึ่งอาจเป็นผิดปกติธรรมดา หรือไม่ธรรมดา 6 อาการผิดปกติธรรมดา..ที่ไม่ธรรมดา อายุรแพทย์จากโรงพยาบาลชั้นนำในสหรัฐ ต่างก็ยกให้ 6 อาการผิดปกติเหล่านี้อันตรายต่อสุขภาพ และไม่ควรเพิกเฉย เพราะจากแค่อาการผิดปกติเล็กน้อยที่ดูเหมือนไม่จำเป็นต้องไปพบแพทย์ แต่ถ้ามีอาการหนักขึ้นและเป็นเรื้อรังนานกว่าปกติ อาจหมายถึงการมาเยือนของโรคร้ายก็ได้ 1.แค่นอนไม่หลับ อาจกลายเป็น โรคหัวใจ เป็นอาการผิดปกติอันดับหนึ่งที่ควรบอกแพทย์ เพราะการนอนไม่หลับเพียงแค่ 1 คืนก็มีผลต่อหัวใจได้ ตั้งแต่การที่เลือดไหลเวียนไปเลี้ยงหัวใจไม่เพียงพอ จนถึงขั้นอาการหัวใจขาดเลือด หากมีอาการนอนไม่หลับอยู่บ่อยครั้งควรไปปรึกษาแพทย์ เพราะหากปล่อยทิ้งไว้อาจเสี่ยงเป็นโรคหัวใจได้ในที่สุด 2.แค่ท้องผูก อาจกลายเป็น โรคมะเร็งลำไส้ใหญ่ อาการท้องผูก คือ การถ่ายอุจจาระน้อยกว่า 3 ครั้งต่อสัปดาห์ เนื่องจากปัจจัยบางอย่างขัดขวางการทำงานของลำไส้ ทำให้กากอาหารผ่านลำไส้ใหญ่ได้ช้าลง ซึ่งถ้ามีอาการท้องผ

การกำหนดเงื่อนไข Countif ในกรณีไม่เท่ากัน โดยอ้างอิงเซลล์

รูปภาพ
โดยปกติ เงื่อนไขสูตร Countif() จะใช้ตัวเลข เช่น ให้นับว่า ในช่วง B2:B5 มีค่าที่เท่ากับ 28 จะเขียนสูตรว่า Countif(B2:B5,28) แต่ในกรณีที่เราต้องการให้นับว่า มีตัวเลขที่มากกว่า หรือน้อยกว่า เราจะกำหนดเงื่อนไขเป็นลักษณะตัวอักษร โดยใช้เครื่องหมายคำพูดคร่อมข้อความที่เป็นเงื่อนไข เช่น ให้นับว่าในช่วง B2:B5 มีค่าที่มากกว่า 28 อยู่กี่ตัว จะเขียนสูตรว่า Countif(B2:B5,">28") แต่ ในกรณีที่จะอ้างอิงโดยระบุชื่อเซลล์ เช่น ให้เปรียบเทียบกับค่าที่คำนวณได้ ซึ่งอยู่ในเซลล์ D1 จะทำอย่างไร หลักการ เราต้องแยกระหว่างเครื่องหมายทางคณิตศาสตร์ เช่น เครื่องหมายมากกว่า หรือน้อยกว่า หรือเท่ากับ หรือมากกว่าหรือเท่ากับ เป็นต้น โดยแยกออกจากชื่อเซลล์ และรวมกันด้วยเครื่องหมาย & วิธีการ จากข้อมูลที่กำหนดให้ ให้นับจำนวนที่มีค่ามากกว่า ข้อมูลในเซลล์ D2 เขียนสูตรได้ ดังนี้ =Countif(B2:B5,">"&D1) ถ้ามีการเปลี่ยนค่าใน D1 คำตอบจะเปลี่ยนไปโดยอัตโนมัติ โดยไม่ต้องแก้ไขสูตร เช่น

เครื่องหมายสถิติ ค่าเฉลี่ย ใน Excel 2010

รูปภาพ
หลายครั้งที่ต้องใช้เครื่องหมาย ค่าเฉลี่ย หรือ Mean ใน Excel 2010 แต่หาไม่พบ จะทำอย่างไร? เครื่องหมาย ค่าเฉลี่ย ใน Excel 2010 อยู่ในชุดตัวอักษร MS Reference Sans Serif วิธีการเรียกใช้งาน มีดังนี้ คลิกที่ช่องที่ต้องการใส่เครื่องหมาย ไปที่ แถบแทรก กลุ่มข้อความ คลิกเครื่องหมายสัญลักษณ์ และเลือกรูปสัญลักษณ์ ดังภาพ  ที่หน้าจอโต้ตอบของ สัญลักษณ์ ให้เลือกแบบอักษร MS Reference Sans Serif เพื่อความรวดเร็ว ให้พิมพ์ข้อความ F7C2 ซึ่งเป็นโค้ดอักขระเลขฐานสิบหก แทนเครื่องหมายค่าเฉลี่ย ลงในช่อง โค้ดอักขระ แล้วคลิก แทรก เครื่องหมาย ค่าเฉลี่ย จะปรากฏ ในเซลล์ที่ระบุ คลิกปุ่ม ปิด เพื่อปิดหน้าจอสัญลักษณ์ สามารถเพิ่มขนาดเครื่องหมายให้ใหญ่ หรือ เล็กได้ ตามต้องการ สามารถเพิ่มข้อความ หรือจัดการอื่น ๆ ได้ เหมือนตัวอักษรปกติ เช่นจัดอยู่ในวงเล็บ เป็นต้น

การสร้างเส้นขอบรอบวงกลม สำหรับ Logo ด้วย Illustrator

รูปภาพ
ต้องการสร้างภาพนี้ หลักการ ภาพนี้เป็นการใช้แปรงที่สร้างเองให้เป็นเส้นขอบ โดยสร้างแปรงให้มีลักษณะโค้ง แล้วบันทึกเป็นแปรงลักษณะเป็น Pattern Brush แต่ประเด็นที่สำคัญคือ ภาพที่จะใช้เป็นแปรงต้องมีสีทึบลงมาข้างล่างครึ่งหนึ่ง มิฉะนั้นจะเห็นขอบของวงกลม เพราะแปรงที่สร้างขึ้นที่ใช้เป็น Stroke จะอยู่กึ่งกลาง ไม่สามารถเปลี่ยนเป็นชิดริมนอก หรือริมใน เหมือน Stroke ทั่วไปได้ วิธีการ กำหนดสีพื้นเป็นสีเหลือง ไม่มีเส้นขอบ เลือก เครื่องมือวงกลม คลิกที่หน้าจอเพื่อเปิดหน้าต่างตั้งค่า ตั้ง W=18mm และ H=12mm เพื่อสร้างรูปวงรี ใช้ Rectangle Tool สร้างสี่เหลี่ยมให้คลุมครึ่งล่างของรูปวงรี เลือกรูปทั้งสองรูป โดยกด Ctrl + A หรือ ใช้ลูกศรสีดำ (Selection Tool หรือ Black Arrow Tool) ลากคลุมทั้งสองรูป เปิด Pathfinder โดยไปที่ Window > Pathfinder เลือก Unite เพื่อรวมทั้งสองรูปเข้าด้วยกัน ใช้ลูกศรสีขาว (Direct Selection Tool หรือ White Arrow Tool) คลิกที่จุดยอด เพื่อให้เกิดแขน ที่แขนข้างซ้าย กดปุ่ม shift ค้างไว้ แล้วใช้ลูกศรสีขาว ลากให้เป็นมุม ดังภาพ ทำเช่นเดียวกันกับอีกข้างหนึ่ง จะได้ดังภาพ