7/21/2011

PHP : Comparison Operators

จาก manual ของ PHP ทำให้เพิ่งรู้ว่า อาจเปรียบเทียบพลาดแบบไม่รู้ตัวได้ ดังนี้

 
<?php
var_dump(0 == "a"); // 0 == 0 -> true
var_dump("1" == "01"); // 1 == 1 -> true
var_dump("10" == "1e1"); // 10 == 10 -> true
var_dump(100 == "1e2"); // 100 == 100 -> true
 
switch ("a") {
case 0:
    echo "0";
    break;
case "a": // never reached because "a" is already matched with 0
    echo "a";
    break;
}
?>
 
 
ถ้าเปรียบเทียบตัวแปรชนิดตัวเลข กับ ตัวอักษร

ตัวแปรชนิดที่เป็นตัวอักษรจะถูกแปลงให้เป็นตัวเลขก่อนเปรียบเทียบ 

ดังนั้นจึงควรพิจารณาใช้ === or !== ซึ่งจะเปรียบเทียบชนิดของตัวแปร โดยไม่มีการแปลงค่าก่อนการเปรียบเทียบ
 
ที่มา  http://php.net/manual/en/language.operators.comparison.php

OpenOffice Calc : สร้างกราฟแท่ง+กราฟเส้น 2 เส้น

วิธีสร้างกราฟตามรูป

1.สร้างตารางข้อมูล โดยเอาอันที่จะเป็นกราฟแท่งไว้ด้านบน (B1)

2.ไฮไลต์ตารางข้อมูลไว้แล้วเลือกเมนู Insert > Chart...
3.Chart type เลือกเป็น Column and Line แล้วใส่ Number of lines เป็น 2 ตามรูป

4.Data Range ให้เลือก Data series in rows เพราะข้อมูลคีย์ไว้ตามแนวนอน (B-M)

5.Data Series ให้เลือกชุดที่จะเป็นกราฟแท่งไว้ด้านบน (B1) ตามรูป

6.Chart Elements ป้อนข้อมูลชื่อกราฟ, ชื่อแกน, ฯลฯ แล้วกด Finish

7.หากต้องการแกน Y เพิ่มให้คลิกขวาที่กราฟแล้วเลือก Insert/Delete Axes... แล้วคลิกเพิ่มที่ Secondary axes

8.จากนั้นคลิกที่เส้นของข้อมูลที่ต้องการย้ายแกนแล้วเปลี่ยนให้ไปอยู่ที่ Secondary Y axis

PHP Get Real IP Address

function getRealIpAddr()
{
    if (!empty($_SERVER['HTTP_CLIENT_IP']))   //check ip from share internet
    {
      $ip=$_SERVER['HTTP_CLIENT_IP'];
    }
    elseif (!empty($_SERVER['HTTP_X_FORWARDED_FOR']))   //to check ip is pass from proxy
    {
      $ip=$_SERVER['HTTP_X_FORWARDED_FOR'];
    }
    else
    {
      $ip=$_SERVER['REMOTE_ADDR'];
    }
    return $ip;
}

ที่มา
http://roshanbh.com.np/2007/12/getting-real-ip-address-in-php.html

Axapta ระบบคำสั่งผลิต มี 6 กระบวนการ

ระบบคำสั่งผลิต มี 6 กระบวนการ
1.Job sheduling (จัดคิวงาน)
2.Start เริ่มคำสั่งผลิต
3.Job Card ใบรายงานคำสั่งผลิตว่าทำอะไรบ้างตาม Route คิดต้นทุนค่าเเรงด้วย
Route คือ เส้นทางการทำงานหรือขั้นตอนการทำงานครับ
4.Picking List ใบรายงงานวัสดุที่ใช้ คิดค่าวัสดุด้วย
5.Report as Finish รายงานยอดสำเร็จ
6.Costing การคิดต้นทุน ค่าเเรงที่เกิดจาก job card + Picking List

เมื่อ รับ Order มา ก็จะมาทำการจัดคิวงานเเละก็จะมาเริ่ม Start จัดทำJob Cardใบรายงานคำสั่งผลิตว่าทำอะไรบ้าง ต่อด้วยใบรายงงานวัสดุที่ใช้ เมื่อทำงานเสร็จก็มาทำรายงานReport as Finish รายงานยอดสำเร็จ เเละสุดท้าย ก็ ทำการคิดต้นทุน Costing

OpenOffice ป้องกันไม่ให้ผู้อื่นมาแก้ไขสูตรคำนวณที่เราได้ตั้งไว้

ขั้นตอนมีดังนี้

1.คลิกเซลล์ที่ต้องการป้องกันสูตร
2.คลิกขวาเลือก Format Cell จะมีหน้าต่าง Format Cell ปรากฏขึ้นมา
3.เลือกที่ Tab Cell Protection
4.ทำเครื่องหมายถูกหน้า Hide formula
5.คลิกปุ่ม OK
6.ไปที่เมนู Tools > Protect Document > Sheet จะีมีหน้าต่างให้ใส่ Password
7.ใส่ Password 5 ตัวลงทั้ง 2 ช่องให้เหมือนกัน
8.คลิกปุ่ม OK

OpenOffice สั่งพิมพ์ออกมาแล้วตัวหนังสือเล็กมาก

OpenOffice สั่งพิมพ์ออกมาแล้วตัวหนังสือเล็กมาก ทำอย่างไร

แก้ไขได้โดยการเข้าไปที่ Format>Page แล้วไปเลือกที่แท็บ Sheet แล้วไปเลือกที่ Scaling Mode เพื่อจัดขนาดเอกสารที่จะพิมพ์ และแก้ตัวเลขให้เป็น 100% เสร็จแล้วกด OK

OpenOfficeเปลี่ยนหน่วยวัดจากนิ้วเป็นเซนติเมตร ทำได้อย่างไร?

ขั้นตอนมีดังนี้
1.ไปที่เมนู Tools แล้วเลือก Options
2.คลิกเครื่อหมาย + หน้า OpenOffice.org Calc
3.เลือกเมนูย่อย General เลือกที่ Measurement Unit แล้วปรับเป็น Centimeter
4.คลิกปุ่ม OK

ความรู้ด้าน IT Tip วิธีแก้ปัญหา svchost.exe Application Error

เคยเจอและเป็นกันไหมครับ เวลาที่ใช้งานคอมพิวเตอร์อยู่นั้น อยู่ๆ ก็มีป๊อบอัพเด้งขึ้นมาให้ตกใจ หัวข้อความว่า “svchost.exe – Application Error”

ดังรูป

จากนั้น เครื่องก็แฮงค์ ใช้งานไม่ได้ ทำอะไรไม่ได้เลย จะกดจะคลิกอะไรมันก็ไม่ยอมทำตามคำสั่ง ต้องรีสตาร์ทเครื่องสถานเดียว จึงจะใช้งานได้ และเมื่อใช้งานไปได้ไม่นาน ก็เกิดอาการเครื่องแฮงค์อีก และมีป๊อบอัพดังรูปข้างต้นเด้งขั้นมาอีก และทำอะไรไม่ได้

ซึ่งอาการ นี้เกิดขึ้นกับผู้ที่ใช้งานคอมพิวเตอร์ที่ติดตั้ง Windows XP SP2, SP3 ซึ่งเกิดจากถูกโจมตีระยะไกล(remote attack) จากผู้ไม่หวังดีหรือแฮกเกอร์ อันเกิดจากรูรั่วทางด้านความปลอดภัยของวินโดวส์นั่นเอง

ซึ่งวิธีแก้ ปัญหา svchost.exe Application Error สามารถทำได้โดยการดาวน์โหลดและติดตั้งSecurity Update for Windows XP (KB958644) ดังนี้ ดาวน์โหลด Security Update for Windows XP (KB958644)เมื่อดาวน์โหลดไฟล์ Security Update for Windows XP (KB958644) มาเสร็จเรียบร้อยแล้ว ให้ทำการติดตั้งลงเครื่อง และทำการรีสตาร์ทเครื่อง 1 ครั้ง จากนั้นปัญหา svchost.exe Application Error ก็จะไม่มากวนใจคุณและเครื่องคอมพิวเตอร์ของคุณแล้วหล่ะครับ

Download
http://www.mediafire.com/?apjl6h2k2pvjc1a

Tip ตั้งเวลา ShutDown Restart Logoff อัตโนมัติใน XP

ถ้าเครื่องที่คุณใช้อยู่เป็นเครื่องที่ทำหน้าที่เชื่อมต่อกับเครื่อง พิมพ์ เวลาที่กลับบ้านไปแล้วก็ยังไม่สามารถปิดเครื่องได้ เพราะต้องเปิดเครื่องไว้ให้คนอื่นสั่งพิมพ์งาน หลายครั้งที่เพื่อนๆ ลืมปิดเครื่องคอมพ์ให้เรา จึงทำให้คอมพ์ถูกเปิดข้ามวันข้ามคืน
หลายคน กลัวเครื่องเสีย เลยไปหาโปรแกรมที่ช่วยปิดเครื่องโดยอัตโนมัติ แต่ถ้าคุณไม่อยากไปหาโปรแกรมให้วุ่นวาย ก็อาจจะใช้โปรแกรม Scheduled Tasks ซึ่งมีมากับวินโดวส์อยู่แล้ว
วิธีการคือ
1. ให้คลิก Start-> All Programs ->Accessories -> System Tools -> Scheduled Tasks
2. จากนั้นให้กดดับเบิ้ลคลิ้กที่ไอคอน Add Scheduled Tasks คลิ้กปุ่ม Next แล้วคลิ้กปุ่ม Browse และเข้าไปที่โฟลเดอร์ C:\Windows\System32 จากนั้นดับเบิลคลิ้กไฟล์ชื่อ shutdown.exe
3. กลับมาที่ Scheduled Task Wizard อีกครั้งให้ตั้งชื่อ Shutdown ที่ Perform this task คลิ้กเลือก Daily เพื่อกำหนดให้มีการ ShutDown อัตโนมัติเครื่องทุกๆ วัน แล้วคลิ้กปุ่ม Next
4. ให้ตั้งเวลาการ ShutDown ที่ช่อง Starttime ที่ Perform this task คลิ้กเลือก Every Day เพื่อให้ทำงานทุกวันที่ Start date ตั้งวัน เดือน ปี ที่เริ่มทำงานให้คลิ้กปุ่ม Next
5. ตั้งรหัสผ่านขึ้นมาแล้วพิมพ์ลงในช่อง Enter the password และยืนยันรหัสผ่านอีกครั้งที่ช่อง Confirm password คลิ้กปุ่ม Next
6. ให้กดคลิ้กเครื่องหมายถูกที่ช่อง Open advanced properties for this task when I click Finish จะปรากฏหน้าต่าง Shutdown ขึ้นมา ที่ช่อง Run ให้พิมพ์คำสั่ง -s -t 0ต่อท้าย C\Windows\system32\shutdown.exe เสร็จแล้วกดคลิ้กปุ่ม OK เมื่อถึงเวลาที่กำหนดก็จะ ShutDown เครื่องให้อัตโนมัติ

แค่นี้ก็ได้การตั้งเวลา ShutDown แล้วแต่ผมจะอธิบายในคำสั่งอื่นๆเพิ่มเติมเผื่อ เพื่อนคนไหนจะนำไปประยุกต์ใช้ได้นะครับ
- โดยคำสั่ง Shutdown -s คือพารามิเตอร์สั่งปิดเครื่อง
- โดยคำสั่ง Shutdown -r คือพารามิเตอร์สั่ง restart เครื่อง
- โดยคำสั่ง Shutdown -l คือพารามิเตอร์สั่ง logoff เครื่อง
- โดยคำสั่ง Shutdown -m \\computername คือพารามิเตอร์ remote ไป Shutdown restart หรือ logoff เครื่องอื่นในวง Lan เรา
- โดยคำสั่ง Shutdown -t xx คือพารามิเตอร์ใช้ตั้งเวลาในแต่ละคำสั่งที่จะใช้หน่วยเป็นวินาที
- โดยคำสั่ง Shutdown -c “comment” คือพารามิเตอร์ให้ขึ้นข้อความก่อนที่จะทำการ Shutdown restart หรือ logoff ความยาวสูงสุด 127 ตัวอักษร

- โดยคำสั่ง Shutdown -f คือพารามิเตอร์สั่งบังคับให้ทำตามคำสั่งที่เราสั่ง โดยไม่รอคำสั่งเตือนจากโปรแกรมที่เราเปิดอยู่

ตัวอย่าง Shutdown ครับ
shutdown -s -t 10 -c “Will be ShutDown at 10 seconds”

ข้อไม่แนะนำ
1 ไม่แนะนําให้ ใช้ ในระหว่างที่เครื่องกําลังประมวณผลโปรแกรม อยู่ครับ
2 ไม่แนะนำ ให้ ไปทําร้ายใครหรือแกล้งใครครับ

Transfer Eudora to Thunderbird Successful

วิธีย้ายเมล์จาก Eudora ไป Thunderbird

1. Back up mail and Attachment
2. Install program Thunderbird
*** If you install new Windows. You must copy and run program Eudora complete. And see mail and Attachment it complete must old program Eudora.
**** You remove cable network out. After run program Thunderbird.
3. Open program and program auto ซิ้งข้อมูล or select menu tool Import ---> Eudora next .... Finish
4. Insert data as user mail,password
5. Delete Eudora Setting เหลือไว้แค่ 2 อัน คือ Local Import and Mail of mane
6. Setting send mail --> Select Tool --->Account setting ---> Tab right select Outgoing Server
and insert Port 10025 click OK. test send mail

** Warning **
- จะซิ้ง mail successful area is two เท่า for mail

VB.net วิธีรับค่า จาก MyLV

รับค่า จาก MyLv เพื่อนำค่าไปใช้งาน
TextBox.text = MyLV.FocusedItem.Text 'เอา คอลัมน์ที่ 1

TextBox_Name.Text = MyLV.FocusedItem.SubItems(1).Text เอา คอลัมน์ที่ 2
(ชื่อ text หรือตัวแปรมารับค่า) = MyLV.FocusedItem.SubItems(1).Text
หรือ

Textbox1.text = MyLV.FocusedItem.SubItems(2).Text ' อันนี้จะเอาข้อมูลคอลัมน์ที่ 3 จากรายการที่เลือกครับ
(ชื่อ text หรือตัวแปรมารับค่า) = MyLV.FocusedItem.SubItems(2).Text

7/07/2011

คำคม สร้างกำลังใจ

" แม้ไม่ได้ทุกอย่างที่หวังไว้

ก็มั่นใจในคุณค่ามหาศาล

หนึ่งส่วนจากเศษฝันเมื่อวันวาน

อาจสร้างงานเกียรติยศปรากฎไกล..."

...........................................

ถ้าหากว่าเราเอาใจใส่ต่อสิ่งที่เราจะทำอย่างจริงจัง

คิดถึงมัน ฝันถึงมัน และเอาใจใส่จดจ่อในสิ่งนั้น อยู่อย่างสม่ำเสมอแล้ว

ก็ไม่มีสิ่งใดในโลก ที่จะกีดขวางมิให้ท่านประสบความสำเร็จในกิจการนั้น ๆ ได้

***************************

" ความอดทนแม้จะเป็นสิ่งที่ขมขื่นแต่ผลของมันมักจะหวานชื่นเสมอ "

...........................................

" ความฉลาดในการดำเนินชีวิต คือ การยอมอดทนในสิ่งที่จำเป็นต้องทน "

*************************

คนที่ทำได้ คือ คนที่เชื่อว่าเขาทำได้

โดยมิได้คำนึงถึงคำว่า "เป็นไปไม่ได้"

*********************

"ความกล้าหาญ คือ การหมิ่นแคลนต่อความตาย และความเจ็บปวด"

****************

ความสำเร็จย่อมเป็นของคนที่ใช้ความพยายาม

ถ้าไม่มีอะไรที่จะต้องเสียหายแต่ได้ประโยชน์ทุกทาง

ด้วยการใช้ความพยายาม...

ก็จงพยายามให้ถึงที่สุด

**********************

ไม่มีสิ่งใดที่ได้มาโดยไม่มีการลงทุน

แต่หากเราเห็นคุณค่าของสิ่งที่เราทำ และปรารถนาความสำเร็จ

เราต้องยอมจ่ายราคาในสิ่งนั้น

การที่ต้องอดทนในสิ่งใดนั้น...เราอาจต้องจ่ายราคาหลายอย่าง

อาจเป็นการสูญเสียความพึงพอใจ

สูญเสียความเป็นส่วนตัว ต้องยากลำบาก เสียเวลา ความคิด แรงกาย และแรงใจ

แต่หากสิ่งที่แลกมา คือความมีคุณค่าและความสำเร็จ

การนั้นก็ควรค่าแก่ราคาที่ได้จ่ายไปกับความอดทนนั้น

***********************

" เคล็ดลับของความสำเร็จ และความก้าวหน้า คือ

กอบกู้บางสิ่งบางอย่างจากการปราชัยทุกครั้ง

********************

การจะกระทำการสิ่งใด ๆ ก็ตาม

เราควรทุ่มเททั้งแรงกายและแรงใจ อย่างสุดความสามารถ

และกระทำการในสิ่งนั้นให้ดีที่สุด...จนสุดกำลังของเรา

***********************

ในการทำสิ่งใด ๆ นั้นเราไม่อาจก้าวพรวดเดียวถึงจุดสุดยอดได้

และไม่มีใครที่โชคดีประสบความสำเร็จได้ตลอดกาล

ในโลกนี้...ไม่มีคนที่ประสบความสำเร็จคนใหนที่ไม่เคยพ่ายแพ้มาก่อน

หากเราไม่รู้จักวางตนและปฏิบัติตนต่อความพ่ายแพ้ได้อย่างถูกต้อง

ก็ไม่มีทางที่จะพุ่งขึ้นสู่จุดสูงสุดหรือประสบความสำเร็จในชีวิตได้...

********************************************

คำว่า พากเพียร นั้น หมายถึง การกระทำที่สม่ำเสมอ

ทำไปทีละน้อย ตามสมควรแก่กำลัง...แต่ไม่หยุด

เพราะทุกอย่างที่เป็นไปโดยสม่ำเสมอย่อมมีกำลังแรงเกินกว่าที่เรานึกฝัน

นำที่ใหลอยู่ไม่ขาดสาย..ย่อมทำให้ก้อนหินกลมมน

ทุกสิ่งทุกอย่างย่อมพ่ายแพ้แก่ความพยายามที่สม่ำเสมอ

ค่อยทำไปทีละน้อยแต่ทำไม่ลดละ...

********************************

ถ้าท่านไปตรง ๆ ไม่ได้ ก็จงไปทางอ้อม

และถ้าท่านไปข้างบนไม่ได้ ก็จงไปข้างล่าง

อย่ายอมแพ้ง่าย ๆ เป็นอันขาด

อุปสรรคแค่ไหน ก็ไม่หวั่น
คืนและวันจะโหดร้าย สักเพียงไหน
ร้อยและพัน ปัญหาจะฝ่าไป
เพียงมีเธอ ยิ้มให้ ที่ปลายทาง

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

ทางข้างหน้าลางเลือนเหมือนว่างเปล่า
แดดจะเผาผิวผ่อง เธอหมองไหม้
ที่ตรงนั้นมีหุบเหว มีเปลวไฟ
ถ้าอ่อนแอจะฝ่าไป อย่างไรกัน

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

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

หากว่าเธอท้อแท้
หรืออ่อนแอในวันไหน
ฉันคนนี้จะขอเป็นกำลังใจ
ให้เธอตลอดไปนานเท่านาน
ด้วยสองมือสองเท้าที่ก้าวมั่น
จะสร้างฝันด้วยแรงอันแข็งขืน
จะคว้าจันทร์งาม ยามค่ำคืน
จะหยัดยืนปีนไปให้ถึงดาว

Excel Column และ Row และ OpenOffice หายแก้ยังไง

Excel Column และ Row หายแก้ยังไง
ปกติ

แต่วันนี้มันหายไป

แก้โดย
1.เข้าไปที่ เมนู Tools เลือก Option ตามรูป

2. ที่ Tab View คลิ๊กเลือก Row & Column headers แล้วก็ Ok ตามรูป

แล้วก็ OK เป็นอัน จบ ครับ

สำหรับ LibreOffice หรือ OpenOffice แก้ไขคล้าย ๆ กันครับ ดังนี้
1. เข้าไปที่ เมนู Tools ----> Options ตามรูป

2. เลือก Tab ซ้ายมือเป็น LibreOffice Calc แล้วเลือก View แล้วก็ติ๊กถูกหน้า Column&row headers ตามรูป

เป็นอันเสร็จครับ

Setting mail Thunderbird

การตั้งค่าเมล์ Mozilla Thunderbird มีอยู่ 2 อย่างคือ แบบ IMAP และ POP,POP3
IMAP จะทิ้งเมล์ไว้ที่ SERVER ทำให้พื้นที่เต็ม แต่ก็เป็นการ ป้องกันเมล์สูญหาย จะใช้ Port 993
POP หรือ POP3 จะดึงเมล์จาก SERVER มาไว้ที่เครื่อง ทำให้เมล์ที่เก็บใน SERVER ไม่มี แต่จะมาเก็บทีเครื่องแทน ใช้ Port 110

1.การตั้งค่า แบบ IMAP เมื่อสร้าง Account ใหม่ Thunderbird จะสร้างให้เป็น IMAP อัตโนมัติ ตามรูป

2. การตั้งค่า แบบ POP หรือ POP3
- เข้าไปที่ Menu Tools ----> Account Setting เลือก Add Account ตามรูป

- ใส่ User name ,Mail ,Password แล้วคลิก Continue แล้วกด Malual Config ตามรูป

- ตั้งค่า เมล์ เป็น POP แล้วคีย์ข้อมูล แล้วคลิก Advance Config ตามรูป

- คลิกที่ Server Setting และ Copies & Folders ในหน้า Account Setting ตามรูป
Server Setting

Copies & Folders

เสร็จแล้วก็ลอง Test mail

3. การตั้งค่าส่งเมล์ออก ตั้งค่าที่ Out going Server SMTP เลือก Edit ตั้งค่าตามรูป

เป็นอันเสร็จ ครับ

7/06/2011

สุดยอดธีมของWINDOWS XPปี2011สวยๆคับเชิญดูรูปข้างใน

สุดยอดธีมของWINDOWS XPปี2011สวยๆคับเชิญดูรูป

Download ได้ที่ http://www.mediafire.com/?vvv43tp3n896rcn

driver xp Dell 4010 และ 4030 inspiron For windows XP

อย่าได้ลำบากเหมือนผม ++
โหลดไม่ได้ บอกมาก็แล้วกัน จะ Upให้ใหม่ เจ้าของ Blog ใจดีคับ

1. http://www.mediafire.com/?ma4qgoj1y620m5s
2. http://www.mediafire.com/?9ubvkvfnpv3tqwb
3. http://www.mediafire.com/?4ryix6xqmti5esu
4. http://www.mediafire.com/?9zchkutfm0to47j

ด้วยความหวังดีจากโปรพอประมาณ อีกแล้วครับท่าน

Driver VGA เรื่องง่าย ๆ แต่เหนื่อย Forsa Geforce FX5500 256MB AGP

อันเนี้ยเจอกับตัวครับ ใครจะไม่รู้ ระดับนี้แล้วแค่เปลี่ยนการ์ดจอใหม่เล่นเอา ปวดหัวอยู่หลายวัน
หลังจากงมอยู่นานกับปัญหาไดรเวอร์ของการ์ดจอ Forsa Geforce FX5500 256MB AGP หน้าตาจะประมาณนี้ครับ

ปัญหาเริ่มที่ว่าเครื่องคอมที่ใส่การ์ดจอตัวนี้ เล่นเกมไม่ได้ เกมที่ว่าก็เช่น Special Force ,Point Blank ตอนแรกผมก็สงสัยว่าไดรเวอร์หรือเปล่าเพราะเคยเจอปัญหาแบบนี้บ่อยๆ ส่วนใหญก็มาจากร้านคอมนั่นแหละ ที่ชอบใช้วิธี ghost ฮาร์ดดิส แล้วไม่ลงไดรเวอร์ของเครื่องนั้นๆต่อมา ผมก็ลองมาเช็คดูจาก properties ที่ desktop ก็พบว่าไดรเวอร์ไม่ได้ลง เพราะแทนที่จะมีชื่อรุ่นของการ์ดจอ กลับเป็น Default Monitor สรุปได้ว่าไดรเวอร์ไม่ได้ลงจริงๆ (หรือจะเช็คจาก Device Manager ก็ได้)
การลงไดรเวอร์ผมก้ใช้วิธีง่ายๆคือ ใช้แผ่นที่แถมมากับการ์ดจอนั้นและครับ พอลงเสร็จเรียบร้อย Restart เข้า Windows มาจอดับ มืด มองไรไม่เห็นแต่ที่แน่ ๆ เครื่องติดอยู่ NumLock กดไฟติด แสดงว่าเครื่องไม่มีปัญหา แต่ใช้ไม่ได้ แล้วลองอีกเครื่องก็เป็นอีก ใช้ไม่ได้ ต่อมาก็ เข้า nvidia.com แล้วให้ทางเว้บเช็ครุ่นและไดรเวอร์ให้อัตโนมัติ ผลก้คือได้ไดรเวอร์ 178.24 มา ผมก็ลงจนเสร็จ Restart อีก 1 ครั้ง พอกลับเข้ามา หน้าจอสีเพี้ยนไปหมด resolution ก็เปลี่ยน นั่นก็หมายความว่าไดรเวอร์มีปัญหา ใช้ไม่ได้ ซึ่งปัญหาแบบนี้จะเกิดก็ต่อเมื่อลงไดรเวอร์ผิดรุ่นผิดยี่ห้อ
ผมก็เลยตัดสินใจลบไดรเวอร์ตัว 178.24 ออก แล้วติดตั้ง 175.19 แทน ผลก้คือเหมือนเดิม สีเพี้ยนกลายเป็น 16 bit
เป็น แบบนี้มา 2 ครั้งผมก็เริ่มสงสัยเลยลองเข้า google หาไดรเวอร์ดู ก็พบว่ามีคนเจอปัญหาแบบเดียวกันเยอะมาก ส่วนมากก็จะมาโพสขอไดรเวอร์ ซึ่งก็ไม่ได้ช่วยอะไรเลย เลยเปลี่ยนไปหาจากเว็บต่างประเทศ ก็เจอข้อมูลมาว่า ไดร์เวอร์ 3 ตัวนี้อาจจะใช้ได้ (เน้นว่า อาจจะ)
- 94.24
- 93.71
- 77.77
หลังจากลองติดตั้งทั้ง 3 ตัวแล้วผลสรุปคือ ไดรเวอร์ที่ใช้ได้กับ Forsa Geforce FX5500 256MB AGP คือ Forceware รุ่น 93.71 สังเกตจากหน้าจอที่กลับมาเป้นปกติและเล่นเกมได้ ก็น่าจะแน่ใจได้แล้ว
เล่นเอาเอาโปรอย่างเรา เกือบอวกแตกเลย

Download ได้ที่นี้นะครับ http://www.nvidia.com/object/winxp_2k_93.71.html

Open Office การใช้งาน Rows to Repeat

คำถาม
ต้องการให้หัวข้อเอกสารปรากฏทุกหน้าต้องทำอย่างไร
คำตอบ
1. เอกสารที่ทำจะเป็นในลักษณะแบบนี้

2. ลองไปที่ File->Page Preview จะได้ลักษณะนี้

3. วิธีการทำ Row to Repeat ให้ไปที่เมนู Format->Print Range->Edit
4. จะปรากฏหน้าต่าง Edit Print Range ขึ้นมา

5. ให้คลิกปุ่มด้านหลังในส่วนของ Rows to Repeat

6. หลังจากนั้นให้คลิกที่แถวที่ต้องการให้ปรากฏทุกหน้าเอกสารในที่นี้คือแถว 1
7. แล้วคลิกที่ปุ่มด้านหลัง

8. หลังจากนั้นกด OK เสร็จแล้วก็ลอง Print Preview ดู

Drive Cd-Rom,DVD-Rom หายแก้อย่างไร

เข้าไปดู ใน Driver Manager เป็นเครื่องหมายตกใจ สีเหลืองแก้โดย

1. ไป START > RUN > พิมพ์ regedit

2. เมื่อเข้า regedit แล้ว หาโฟลเดอร์ HKEY_LOCAL_MACHINE SYSTEM CurrentControlSet Control Class {4D36E965-E325 -11CE-BFC1-08002BE10318}

3. เมื่อคลิก {4D36E965-E325 -11CE-BFC1-08002BE10318} ด้านขวามือจะเห็น "Upperfilters" "Lowerfilters" ลบทั้งสองค่าออก ปิด regedit แล้วรีสตาร์ทเครื่อง

ก็แก้ปัญหานี้ได้ ถ้าไม่ได้ก็ต้องหาวิธีอื่นน่ะครับ *ใช้ได้เฉพาะ Windows XP น่ะครับ OS ไว้เจอแล้วจาโพส์ใหม่น่ะครับ

ตั้งค่า Excel ปริ้นกระดาษต่อเนื่องให้พอดี

การตั้งค่า Excel ให้ปริ้นกระดาษต่อเนื่องได้พอดี
1. ตั้งค่าหน้ากระดาษที่ Manu File--->Page Setup ตรง Paper size เลือก เป็น Letter ดังรูป

2. ตั้งค่าที่ปริ้นเตอร์ที่เราจะปริ้นให้เป็น Letter ด้วย โดยเข้าไปที่ Control Panel --->Printer and Faxes คลิกขวาที่ปริ้นเตอร์ เลือก Properties ที่ Tab Device Settings ตรง Manual Paper Feed ก็เลือกเป็น Letter เหมือนกันกับข้อ 1

3. จัดหน้าข้อมูลใน Excel ที่ต้องการปริ้นแล้วสั่งปริ้น ก็จะได้ตรงตามที่เราจัด ครับ

**** ถ้าไม่ได้
ต้องตั้งค่า่ของกระดาษใหม่ เข้าไปที่ Control Panel คลิกที่ Printer ไปที่เมนู File ---> Server Properties ตามรูป

คลิกที่ Create a new form ตามรูป
แล้วใส่ ชื่อที่ต้องการเรียกใช่
ใส่ ขนาดกระดาษ Letter เราวัดเอา ของที่ใช้ในบัญชี กว้าง 8.5 " ยาว 9 "
แล้ว Save
ไปทำตามข้อ 1. เลือก Paper size เป็น ชื่อที่เราตั้ง แล้วลองปริ้นดู ถ้าไม่ได้ปรับขนาดกระดาษอีก

**ทดลอง แล้วในรุ่น Epson-LQ630 น่ะครับรุ่นอื่น อาจต้องใช้ต้องปรับขนาดกระดาษเป็นแบบอื่น น่ะครับแต่ต้องปรับให้เหมือนกันและลองปริ้นดู เช่น เป็น Letter หรือ Legal และอื่น ๆ แต่ต้องตั้งใน ปริ้นเตอร์และ ไฟล์งานให้เหมือนกัน

7/05/2011

VB.net Format Date กำหนดรูปแบบวันที่ให้แสดงใน datetimepicker

CustomForma Fromat Date

Public Sub SetMyCustomFormat()
    ' Set the Format type and the CustomFormat string.
    dateTimePicker1.Format = DateTimePickerFormat.Custom
    dateTimePicker1.CustomFormat = "MMMM dd, yyyy - dddd"
End Sub 'SetMyCustomFormat

7/04/2011

VB.Net ให้ Msgbox ขึ้นบรรทัดใหม่

หากข้อความยาวต้องการให้ขึ้นบรรทัดใหม่ใน VB.NET มีคำสั่งที่ชื่อว่า
vbNewLine เพื่อใช้กำหนดให้ขึ้นบรรทัดใหม่ โดยใช้งานดังนี้ เช่น

MsgBox(“Welcome to “+vbLine+”VB.NET”+vbNewLine+” 2008” )

VB.net ปิดไม่ให้แก้ไขข้อมูลใน DataGridView

VB.net ปิดไม่ให้แก้ไขข้อมูลใน DataGridView
ตั้งที่ Properties ของ DataGridView
ตรง EditMode เลือกเป็น EditProgrammatically

เท่านี้ DataGridView ก็จะอ่านได้อย่างเดียวห้ามคลิ๊กแก้ไข

VB.net set ค่าให้หัว Tab ด้านบนโปรแกรม

ชื่อ Form = ชื่อ Form & " [" & myReader.GetValue(myReader.GetOrdinal("ตัวแปรที่ต้องการแสดง")) & "]"

Example

Form_Main.Text = Form_Main.Text & " [" & myReader.GetValue(myReader.GetOrdinal("EmpName")) & "]"

7/03/2011

โค๊ดทำให้ภาพเลื่อนขึ้นบนแล้วลงล่างสลับกันและซ้ายขวาว

โค๊ดทำให้ภาพเลื่อนขึ้นบนแล้วลงล่างสลับกัน

เลื่อนขึ้นลง

<marquee behavior="alternate" direction="up" height="100" scrollamount="2" width="350"> วางโค๊ดภาพตรงนี้</marquee>

เลื่อนซ้ายขวา

<marquee behavior="alternate" scrollamount="2">วางข้อมูลโค๊ดภาพตรงนี้</marquee>

ความหมายของคำสั่ง
marquee คือ กำหนดให้วิ่ง
alternate คือ ไปซ้ายขวา หรือสลับกัน
scrollamount คือ กำหนดความเร็ว

วิธีทำให้เครื่องคอมพิวเตอร์เวลาเปิืดเครื่องโหลดเร็วขึ้น

บางครั้งเครื่องคอมมีการติดตั้งโปรแกรมไว้่มาก เวลาเปิดเครื่องอาจทำให้มีการโหลดช้า เปิดเครื่องไม่ทันใจ มีวิธีทำให้โหลดเร็วขึ้น

ใ้ห้ไปที่ start แล้วไปที่ปุ่ม ตามภาพที่ 1 แล้วให้กด ไปที่ปุ่ม Run แล้วจะปรากฏภาพที่ 2

เมื่อปรากฏภาพดังภาพที่ 2 แล้ว ก็ให้พิมพ์ คำว่า msconfig แล้วกดปุ่ม Ok แล้วจะปรากฏภาพ ที่ 3

เมื่อปรกกฏภาพที่ 3 ให้เลื่อนเม้าส์ไปที่ ปุ่ม Startup ตามภาพที่ 3 ที่ลูกศรชี้อยู่ เมื่อกดปุ่ม Startup แล้วจะปรากฏภาพที่ 4

ภาพที่ 4 วิธีขั้นสุดท้าย คือ ให้ติกช่องที่ไม่ต้องการรันออก หรือโปรแกรมที่ไม่จำเป็นต้องการรัน อย่างเช่นโปรแกรม Acd see,power dvd,winampa, เป็นต้น เมื่อติกโปรแกรมที่ไม่จำเป็นต้องรันออก เวลาเปิดเครื่องคอมก็จะทำให้เครื่องเปิดหรือโหลดเร็วขึ้น

** พวกที่เป็นไฟล์ run อยู่ที่ system windows32 ไม่ต้องเอาออกน่ะครับเป็นไฟล์ระบบ

OpenOffice : Rows to repeat at top

OpenOffice : Rows to repeat at top
เวลาจะพิมพ์โดยให้มีแถวใดขึ้นอยู่บนหัวกระดาษทุกหน้า
ใน Excel จะเข้าไปที่
1.File > Page Setup…
2.แล้วก็คลิก tab Sheet
3.ในกลุ่มของ Print titles เลือก Rows to repeat at top ดังรูป

ใน OpenOffice เข้าไปที่
1.Format > Print Ranges > Edit…
2.แล้วก็เลือกตรง Rows to repeat

Axapta : Get or Set Checkbox value

Axapta X++: Get or Set Checkbox value

public void clicked()
{
Qty tmpQty1;
Qty tmpQty2;
FormCheckboxControl formCheckboxControl;
;

super(); // ต้องรัน super ก่อน ไม่งั้นค่าไม่เปลี่ยน
// รับค่าจาก design
formCheckboxControl = element.design().control(control::ProdParmHistoricalCost_EndJob);
// box::info(strfmt("%1",formCheckboxControl.value()));
if(formCheckboxControl.value() == 1){ //ถ้า checked จะเป็น 1
tmpQty1 = ProdTable::find(ProdParmHistoricalCost.ProdId).QtySched;
tmpQty2 = ProdTableJour::reportedFinishedGood(ProdParmHistoricalCost.prodId);

if(tmpQty1 != tmpQty2){
if(box::yesNo("Sure?", DialogButton::Yes, "Confirm") == DialogButton::Yes)
{
if(box::yesNo("Sure?",DialogButton::Yes,"Confirm")== DialogButton::Yes){
formCheckboxControl.value(true); //สั่งให้ checked
}else{
formCheckboxControl.value(false); //สั่งให้ ไม่ checked
}
}else{
formCheckboxControl.value(false);
}
}
}
}

Axapta : Open OpenOffice document and Save as

Axapta : Open OpenOffice document and Save as
COM OpenOffice;
    COM oDeskTop;
    COM oDocument;
    COMVariant arg;
    COMVariant byte;
    Array Arr = new Array(Types::Class);
    Array oArr = new Array(Types::Class);
    str url,outFile;
    COM FileProperties;
;
    OpenOffice = new Com("com.sun.star.ServiceManager");
    oDeskTop = OpenOffice.CreateInstance("com.sun.star.frame.Desktop");

// #############################################################
// เปิดไฟล์
    arg = comVariant::createFromArray(Arr);
    url = "file://Axaptaserver/AxaptaSP4/Excel/Losses.xls";
    oDocument = oDeskTop.LoadComponentFromURL(url, "_blank", 0, arg);
// #############################################################

// #############################################################
// Save as เป็นอีกไฟล์
    FileProperties = OpenOffice.Bridge_GetStruct('com.sun.star.beans.PropertyValue');
    FileProperties.Name('Overwrite');
    FileProperties.Value(true);
    oArr.value(1,FileProperties);
    arg = comVariant::createFromArray(oArr);
    outFile = "file:///C:/Losses.xls";
    oDocument.storeAsURL(outFile,arg);
// #############################################################

Axapta : Find for update

Axapta X++: Find for update

ปกติจะ update ทีนึง ก็ใช้ select forupdate เพิ่งรู้ว่าทำแบบนี้ได้ด้วย
ใช้ static method ที่ชื่อ find ซึ่ง table ส่วนใหญ่จะมีอยู่แล้ว แล้วก็ใส่ parameter forupdate เป็น true

static void FindForUpdate(Args _args)
{
EmplTable myRow;
;
ttsbegin;
myRow = EmplTable::find('ID',true);
myRow.Name ='Name';
myRow.update();
ttscommit;
}

Axapta Find user group of current userid

Axapta X++ Find user group of current userid

UserGroupList userGroupList;
;
WHILE SELECT userGroupList
WHERE userGroupList.userId == curuserid()
// && userGroupList.groupId == 'searchGroup';
{
print userGroupList.groupId;
}
pause;

คิดอย่างไรให้มีความสุข

คิดอย่างไรให้มีความสุข ยากเหมือนกันนะขึ้นอยู่กับว่า ความสุขของคุณอยู่ที่ตรงไหน แค่ไหนถึงจะสุข บางคนแค่มีงานทำมีเงินเดือนใช้ถึงจะไม่ชนเดือนก็ไม่เป็นไร แค่นี้ก็สุข ถ้าตั้งเงื่อนไขไว้เยอะก็สุขยากหน่อยกว่าจะครบเงื่อนไข ทั้งหมดมันอยู่ที่ใจจริงๆ สำหรับเด็กวัยรุ่นก็จะสุขง่ายเพราะเค้าไม่กำหนดกฎเกณฑ์ว่าแค่ไหนถึงจะสุขเหมือนผู้ใหญ่ วัยรุ่นถึงดูมีความสุขได้ตลอดเวลาแค่เห็นใบไม้ร่วงก็หัวเราะกันเป็นบ้าเป็นหลัง ถ้าเราอยากสุขก็ต้องคิดให้ได้เหมือนเด็ก อย่าไปเรียกร้องให้มากนัก ได้เกิดมาก็โชคดีแล้ว

ความเอ๋ย ความสุข

ใครๆทุกคน ชอบเจ้า เฝ้าวิ่งหา

“แกก็สุข ฉันก็สุข ทุกเวลา”

แต่ดูหน้า ตาแห้ง ยังแคลงใจ

ถ้าเราเผา ตัวตัณหา ก็น่าจะสุข

ถ้ามันเผา เราก็ “สุก” หรือเกรียมได้

เขาว่าสุข สุขเน้อ อย่าเห่อไป

มันสุขเย็น หรือสุกไหม้ ให้แน่เอ่ยฯ

ท่านพุทธทาสภิกขุ

สิ่งล่วงแล้ว แล้วไป อย่าใฝ่หา

ที่ไม่มา ก็อย่าพึง คนึงหวัง

อันวันวาน ผ่านพ้น ไม่วนวัง

วันข้างหน้า หรือก็ยัง ไม่มาเลย

ในท้ายที่สุดขอฝาก
อันทุกข์สุขอยู่ที่ใจ มิใช่หรือ ใจเราถือเป็นทุกข์ไม่สุกใส
ใจไม่ถือเป็นสุขไม่ทุกข์ใจ เราอยากได้ความทุกข์หรือสุขนา

7/01/2011

Axapta X++ ให้ขึ้น Box ใส่ข้อมูลก่อน ทำงานใน code

ประกาศตัวแปร

   int                         OrderQty;
    Dialog                   dl;
    DialogField            dlfQty;

;

   dl = new Dialog("Insert QTY");
   dlfQty = dl.addFieldValue(1,1,"Qty in Order : ");

if(dl.run()){
   OrderQty            = dlfQty.value();

   print      OrderQty ;
}

ทดสอบส่งภาพ

หน้าเว็บ