install unrar on ubuntu 10.04

 Download deb file
http://packages.ubuntu.com/lucid/i386/unrar/download

cd key

Nucleus Kernel MS Access Recovery V4.04.05 serial number

http://serialnumber.in/serial/nucleus-kernel-ms-access-recovery-v40405/27717

Serial Number	Here you go full serial.
Rate the serial

E-mail: www@crackzplanet.com

Serial: YC7L1M1OQLY4XLA

เปลี่ยน Prespective ใน Photoshop ด้วยเครื่องมือ Crop

คัดลอกมาจาก http://socialintegrated.com/photoshop_change_your_persperctive_with_the_crop_tool

เมื่อคุณถ่ายรูปโดยทำมุมกับวัตถุที่ต้องการจะถ่าย วัตถุที่ถ่ายนั้นจะมีการบิดเบี้ยวไปจากความเป็นจริงหรือที่เรียกว่า “distortion” ถ้าคุณถ่ายรูปหน้าต่างและคุณไม่ได้ยืนตรงหน้าของหน้าต่างพอดีแล้ว หน้าต่างที่คุณถ่ายรูปมาจะมีลักษณะเป็นรูปสี่เหลี่ยมคางหมูแทนที่จะเป็นรูปสี่เหลี่ยมจริงๆ โดยคุณสามารถแก้ไข Distortion นี้ได้โดยใช้เครื่องมือที่มีให้ใน Photoshop ซึ่งเราได้เคยเรียนรู้การตัดรูปภาพโดยใช้เครื่องมือ Crop โดยมี Guide ใน Photoshop เป็นตัวช่วเพื่อสร้างรูปใหม่ให้สวยดั่งใจ  และในกรณีที่คุณใช้ไฟล์ raw ในการทำงานคุณสามารถอ่านเรื่องการเซตระบบให้เปิดภาพด้วย Camera Raw  ก่อนก็ได้

เครื่องมือ crop ในโปรแกรม Photoshop มีออปชั่นพิเศษซึ่งจะทำการเปลี่ยน Perspective ของรูปภาพโดยทำการแก้ไขการ distorion ได้อย่างรวดเร็วมาก โดยหน้าต่างในรูปภาพของคุณควรจะมีลักษณะเป็นสี่เหลี่ยม โดยคุณเลือกพื้นที่ในรูปที่เป็นสี่เหลี่ยมแล้วทำการขยายพื้นที่เลือกออกไปให้คลุมทั้งรูป เมื่อคุณคลิกเครื่องหมายถูก แล้วโปรแกรม Photoshop จะทำการ crop รูปให้ใหญ่ที่สุดเท่าที่จะทำได้โดยทำการเปลี่ยน perspective ให้ด้วย

ถ้าคุณต้องการที่จะเรียนรู้ปรับรูปองค์ประกอบภาพให้ได้ดั่งใจด้วยการตัด, หมุน ย่อและขยาย

1. เปิดรูปภาพที่ต้องการจะเปลี่ยน perspective

2. กด command + spacebar ( Ctrl + spacebar) แล้วทำคลิกและลากในรูปภาพเพื่อทำการซูมเข้าไป

3. คลิกเครื่องมือ Crop แล้วกดค้างไว้

4. เลือก Perspective Crop Tool
5. คลิกในแต่ละมุมของพื้นที่ที่เป็นรูปสี่เหลี่ยนผืนผ้าในรูปภาพ

หมายเหตุ โดยที่รูปภาพจะสามารถเลื่อนได้เมื่อคุณทำการลากเมาส์ในขณะใช้ Perspective Crop Tool

(A)  ทำการเลือกพื้นที่ Crop ในส่วนที่จะต้องการแปลงให้ภาพเป็นสี่เหลี่ยมที่ถูกต้อง

6. กด Option + spacebar (Alt+ spacebar) และทำการคลิกและลากในรูปภาพเพื่อทำการซูมออก

7. คลิกและลากของตำแหน่งกลางด้านของพื้นที่เลือกให้ครอบคลุมทั้งรูปภาพ

8. คลิกเครื่องหมายถูก

โปรแกรม Photoshop จะทำการแก้ไข Distortion ให้เรียบร้อย

ระวังนะครับ!!!

เครื่องมือ Crop () บางทีอาจจะไม่สามารถแก้ distortion ของรูปที่ทำการ crop ไปแล้วได้ ถ้ารูปที่ทำการแก้ด้วย prespective crop ไม่ตรงแล้ว อาจจะเป็นเพราะคุณวางตำแหน่งของพื้นที่สี่เหลี่ยมไม่ตรงก็ได้ ทำการคลิกปุ่มยกเลิก () ใน option bar แล้วลองทำการเลือกพื้นที่สี่เหลี่ยมใหม่อีกครั้ง

คีย์ลัด

กด C เพื่อใช้งานเครื่องมือ Crop แล้วกด Enter ในการสั่งให้ perspective crop ทำงานและกด Esc เพื่อทำการยกเลิก

เสริมความรู้

ถ้ามีการกำหนดความกว้าง, ความสูง หรือค่า resolution ใน option bar ในเครื่องมือ Perspective Crop แล้ว ให้แน่ใจว่าคุณคลิก Clear ก่อนที่จะเริ่มกำหนดตำแหน่งรูปสี่เหลี่ยมในรูปภาพ

บทความก่อนหน้านี้: การสร้างรูปเท่ห์ๆ ในแบบหลายรูปในรูปเดียว

Haguichi บอกว่า Hamachi not installed ใน Ubuntu 10.04

from http://askubuntu.com/questions/164296/glibcxx-3-4-15-not-found

WHEN==>
sudo hamachi -c /etc/hamachi start

 ==>ERROR:
...   libstdc++.so.6: version 'GLIBCXX_3.4.15' not found ....

THEN==>

sudo apt-get install libstdc++6
sudo ldconfig

THEN(1)==>
strings /usr/lib/libstdc++.so.6 | grep GLIBC        ==>>
(If error go to THEN(2))

==>SHOW:
...
GLIBCXX_3.4.12
GLIBCXX_3.4.13
GLIBCXX_3.4.14
...
GLIBC_2.2.5
GLIBC_2.3
GLIBC_2.4
GLIBC_2.3.4
...

THEN(2)==>
Update your stdc++ libraries from this PPA              ==>>
==>

sudo add-apt-repository ppa:ubuntu-toolchain-r/test
sudo apt-get update
sudo apt-get upgrade
sudo apt-get dist-upgrade

THEN==>
strings /usr/lib/libstdc++.so.6 | grep GLIBC        ==>>

==>SHOW:
...
GLIBCXX_3.4.12
GLIBCXX_3.4.13
GLIBCXX_3.4.14
GLIBCXX_3.4.15
...
GLIBC_2.2.5
GLIBC_2.3
GLIBC_2.4
GLIBC_2.3.4
...

It Ok!


GLIBCXX_3.4.15 is an object in libstdc++.so.6.0.16.
( libstdc++.so.6.0.15 ? ).
'libstdc++.so.6.0.16' is part of gcc-4.6.x .

ปรับปรุงสิทธิ์ใน jhcis ด้วยไฟล์จาก ucsearch client

#ลบสิทธิ์เดิมในตาราง person ทิ้งทั้งหมดก่อน
UPDATE person SET
person.rightcode = NULL,
person.rightno = NULL,
person.hosmain = NULL,
person.hossub = NULL,
person.dateregis = NULL,
person.datestart = NULL,
person.dateexpire = NULL;

#เอาลักษณะสิทธิ์อ้างอิงที่รับจาก สป.สชเพิ่ิมเข้าในตารางสิทธิ์มาเพราะถ้ามีใครมีสิทธิิ์ที่ไม่มีในรายการอ้างอิง การปรับปรุงสิทธิ์จะล้มเหลวทั้งหมด
INSERT INTO `cright` (rightcode, rightname)
SELECT Field1, Field2 FROM `refright`
WHERE NOT EXISTS
(SELECT * FROM `cright` WHERE cright.rightcode=refright.Field1);

#เอาสิทธิ์ที่ได้รับจริงแต่ไม่มีในตารางลักษณะสิทธิ์เพิ่มเข้าในตารางสิทธิ์  เพราะถ้ามีใครมีสิทธิิ์ที่ไม่มีในรายการอ้างอิง การปรับปรุงสิทธิ์จะล้มเหลวทั้งหมด
INSERT INTO `cright` (rightcode, rightname)
SELECT givedright.SUBINSCL,givedright.SUBINSCL_NAMEFROM
from(SELECT DISTINCT `right-nhso`.SUBINSCL,
`right-nhso`.SUBINSCL_NAMEFROM
`right-nhso`) AS givedright
WHERE NOT EXISTS
(SELECT * FROM `cright` WHERE cright.rightcode=givedright.SUBINSCL);

#ปรับปรุงคำบรรยายสิทธิ์ให้ตรงกับคำบรรยายในตาราง refRight
UPDATE cright , refright
SET
cright.rightname = refright.Field2
WHERE
cright.rightcode = refright.Field1;

#สร้้างตาราง right-nhso-mod เพื่อสร้างสิทธิ์ย่อย (subinscl) ให้้กับสิทธิ์หลัก ( maininscl ) ที่ไม่มีสิทธิ์ย่อย
DROP TABLE IF EXISTS `right-nhso-mod`;
CREATE TABLE `right-nhso-mod` SELECT `right-nhso`.*  FROM `right-nhso`;

UPDATE `right-nhso-mod`, `right-nhso`
SET
`right-nhso-mod`.SUBINSCL = "S1"
WHERE
`right-nhso-mod`.MAININSCL = "SSS"
AND `right-nhso-mod`.SUBINSCL IS NULL;

UPDATE `right-nhso-mod`
SET
`right-nhso-mod`.SUBINSCL = "12"
WHERE
`right-nhso-mod`.MAININSCL = "VSS"
AND `right-nhso-mod`.SUBINSCL IS NULL;

UPDATE `right-nhso-mod`
SET
`right-nhso-mod`.SUBINSCL = "25"
WHERE
`right-nhso-mod`.MAININSCL = "SSI"
AND `right-nhso-mod`.SUBINSCL IS NULL;

UPDATE `right-nhso-mod`
SET
`right-nhso-mod`.SUBINSCL = "51"
WHERE
`right-nhso-mod`.MAININSCL = "NRD"
AND `right-nhso-mod`.SUBINSCL IS NULL;

UPDATE `right-nhso-mod`
SET
`right-nhso-mod`.SUBINSCL = "O1"
WHERE
`right-nhso-mod`.MAININSCL = 'OFC'
AND `right-nhso-mod`.SUBINSCL IS NULL;

#ปรับปรุงสิทธิ์บุคคลในตาราง person
UPDATE person , `right-nhso-mod`
SET
person.rightcode = `right-nhso-mod`.SUBINSCL,
person.rightno = `right-nhso-mod`.CARD_ID,
person.hosmain = `right-nhso-mod`.HMAIN,
person.hossub = `right-nhso-mod`.HSUB,
person.datestart = `right-nhso-mod`.STARTDATE,
person.dateexpire = `right-nhso-mod`.EXPDATE
WHERE
person.idcard = `right-nhso-mod`.`PERSON_ID`;

#สร้างตาราง  __tmpInscl จากค่า rightcode ที่มีในตาราง visit ไว้อ้างอิงว่าลบไม่ได้ (มันไม่ยอมให้ลบ)
DROP TABLE IF EXISTS `__tmpinscl`;
CREATE TABLE `__tmpinscl` SELECT DISTINCT visit.rightcode as rightcode  FROM visit;

#นำค่าจากตาราง refRight ซึ่งนำสิทธิ์จาก nhso มาใส่ในตาราง __tmpInscl (สิทธิ์มาตรฐานล่าสุด จะลบทำไม)
INSERT INTO `__tmpinscl` (rightcode)
SELECT DISTINCT Field1 FROM `refright`
WHERE NOT EXISTS
(SELECT * FROM `__tmpinscl` WHERE `__tmpinscl`.`rightcode` = refright.Field1);

#ลบสิทธิ์ที่เกินจำเป็น (ไม่มีในตาราง __tmpInscl) ออกจากตาราง cright
DELETE  cright FROM cright
  LEFT JOIN `__tmpinscl` ON `__tmpinscl`.rightcode = cright.rightcode
      WHERE `__tmpinscl`.rightcode IS NULL;

#ลบตาราง __tmpInscl ทิ้งเพราะไม่ใช้แล้ว
DROP TABLE IF EXISTS `__tmpinscl`;

เก็บภาพที่ชอบ

ทุ่มซื้อหวย หาตังค์ให้เมียไปเสริมสวย อยากมีเมียหน้าตาแจ่มๆ

            เบื่อหน้าเดิม หน้าไม่พัฒนา (ใครว่าใครไม่รู้ คำพูดคุ้นๆแฮะ)

Chrome / Chromium: Aw, Snap! every page on 10.04 Lucid Lynx

sudo gedit /etc/apt/sources.list

deb http://ppa.launchpad.net/chromium-daily/ppa/ubuntu lucid main
deb-src http://ppa.launchpad.net/chromium-daily/ppa/ubuntu lucid main

sudo apt-get update
sudo apt-get upgrade

หรือ

sudo add-apt-repository ppa:chromium-daily/ppa
sudo apt-get update
sudo apt-get install chromium-browser

เปลี่ยน connection ของ jhcis

Public Function Check_Host(sserver As String, sschema As String, suser As String, spassword As String, sport As String) As Boolean
On Error GoTo errdesc
Dim conn As ADODB.Connection
   
    Set conn = New ADODB.Connection
 '   conn = "Driver={mySQL ODBC 3.51 Driver};Server=" & sserver & ";" & _
           "Port=" & sport & ";Option=10;Database=" & sschema & ";Uid=" & suser & ";Pwd=" & spassword & ";"
    conn = "Driver={mySQL ODBC 3.51 Driver};Server=" & sserver & ";" & _
           "Port=" & sport & ";Database=" & sschema & ";Uid=" & suser & ";Pwd=" & spassword & ";"
    conn.Open
    Check_Host = True
    conn.Close
    Set conn = Nothing
errdesc:
    If Err.Number <> 0 Then
        If Err.Description Like "*Unknown database*" Then
            MsgBox "หา Database บ่พ้อ", vbOKOnly + vbInformation, "Error..."
      '     MsgBox "Unknown Database specified.", vbOKOnly + vbInformation, "Error..."
            Check_Host = False
        ElseIf Err.Description Like "*Unknown MySQL server host*" Then
            MsgBox "ติดต่อ Server  ไม่ได้", vbOKOnly + vbInformation, "Error..."
    '       MsgBox "Unknown Server Host specified.", vbOKOnly + vbInformation, "Error..."
            Check_Host = False
        ElseIf Err.Description Like "*Access denied for user*" Then
            MsgBox "username หรือ password ไม่ถูกต้อง", vbOKOnly + vbInformation, "Error..."
   '        MsgBox "Wrong username or password specified.", vbOKOnly + vbInformation, "Error..."
            Check_Host = False
        ElseIf Err.Description Like "*Can't connect to MySQL server*" Then
            MsgBox "ติดต่อ  Mysql ไม่ได้", vbOKOnly + vbInformation, "Error..."
  '          MsgBox "Incorrent port no. or host server unknown.", vbOKOnly + vbInformation, "Error..."
            Check_Host = False
        End If
    End If
End Function

อ้างอิงฟังชั่นในไฟล์ mdb อื่นใน directory เดียวกัน

Function FixUpRefs()
Dim loRef As Access.Reference
Dim intCount As Integer
Dim intX As Integer
Dim blnBroke As Boolean
Dim strPath As String
Dim FoundSpacialRef As Boolean
On Error Resume Next

'Count the number of references in the database
intCount = Access.References.Count

'Loop through each reference in the database
'and determine if the reference is broken.
'If it is broken, remove the Reference and add it back.
FoundSpacialRef = False
For intX = intCount To 1 Step -1
            Set loRef = Access.References(intX)
            With loRef
                        blnBroke = .IsBroken
                        strPath = .FullPath
                        If blnBroke = True Or Err <> 0 Then
                     
                                strPath = .FullPath
                                With Access.References
                                                .Remove loRef
                                                .AddFromFile strPath
                                End With

                        End If
                '===
                        If .Name = "PolngpoleVba" Then
                                    FoundSpacialRef = True
                         End If
                    '===
            End With
Next

If FoundSpacialRef Then
    Access.References.Remove Access.References("PolngpoleVba")
End If
    Access.References.AddFromFile CurrentProject.Path & "\" & "PolngpoleVba.mdb"
 
Set loRef = Nothing

' Call a hidden SysCmd to automatically compile/save all modules.
Call SysCmd(504, 16483)
End Function

เพิ่มสถานบริการใน jhcis

VBA เพิ่มสถานบริการใน jhcis โดย ms-access 2003 ให้เปลี่ยนชื่อไฟล์สถานพยาบาลเป็น hospitals.txt แล้วใส่ใน โฟล์เดอร์เดียวกันกับไฟล์ access นี้

ในโมดูลใส่
Public Function GetDBPath() As String
    Dim strFullPath As String
    Dim i As Integer

    strFullPath = CurrentDb().Name

    For i = Len(strFullPath) To 1 Step -1
        If Mid(strFullPath, i, 1) = "\" Then
            GetDBPath = Left(strFullPath, i)
            Exit For
        End If
    Next
End Function

และในฟอร์มใส่
Private Sub Form_Load()
    CodeDb.Execute "INSERT INTO chospital ( hoscode, hosname, provcode, distcode, subdistcode, mu ) SELECT hospitals.F1, hospitals.F2, hospitals.F4," & _
    "hospitals.F5, hospitals.F6, hospitals.F7 FROM [Text;HDR=NO;FMT=Delimited(,);CharacterSet=874;Database=" & _
    GetDBPath & " ;].hospitals.TXT AS hospitals LEFT JOIN chospital ON hospitals.F1=chospital.hoscode WHERE (((chospital.hoscode) Is Null));"
End Sub

update java

su -
echo "deb http://ppa.launchpad.net/webupd8team/java/ubuntu precise main" | tee -a /etc/apt/sources.list
echo "deb-src http://ppa.launchpad.net/webupd8team/java/ubuntu precise main" | tee -a /etc/apt/sources.list
apt-key adv --keyserver keyserver.ubuntu.com --recv-keys EEA14886
apt-get update
apt-get install oracle-java7-installer
exit

ติดตั้ง xampp 1.6.8a บน ubuntu

sudo su
wget http://www.apachefriends.org/download.php?xampp-linux-1.6.8a.tar.gz
tar xvfz xampp-linux-1.6.8a.tar.gz -C /opt
/opt/lampp/lampp start

AddDefaultCharset UTF-8
/opt/lampp/etc/extra/httpd-xampp.conf

sudo su
wget https://jaist.dl.sourceforge.net/project/xampp/XAMPP Linux/1.6.7/xampp-linux-1.6.7.tar.gz
tar xvfz xampp-linux-1.6.7.tar.gz -C /opt
/opt/lampp/lampp start

Pangram ภาษาไทย

Pangram ภาษาไทย

เป็นมนุษย์สุดประเสริฐเลิศคุณค่า
กว่าบรรดาฝูงสัตว์เดรัจฉาน
จงฝ่าฟันพัฒนาวิชาการ
อย่าล้างผลาญฤๅเข่นฆ่าบีฑาใคร
ไม่ถือโทษโกรธแช่งซัดฮึดฮัดด่า
หัดอภัยเหมือนกีฬาอัชฌาสัย
ปฏิบัติประพฤติกฎกำหนดใจ
พูดจาให้จ๊ะๆ จ๋าๆ น่าฟังเอยฯ

ขาดตัว "ฦ" แต่พบว่าจริงๆ แล้วขาดตัว ฃ
ฅ ณ ส่วน "ฦ" "ฤ" เป็นสระไม่ใช่พยัชนะ


นายสังฆภัณฑ์ เฮงพิทักษ์ฝั่ง ผู้เฒ่าซึ่งมีอาชีพเป็นฅนขายฃวด
ถูกตำรวจปฏิบัติการจับฟ้องศาล ฐานลักนาฬิกาคุณหญิงฉัตรชฎา ฌานสมาธิ

งานงานงาน

บันทึกการตรวจลูกน้ำ

รหัส ICD10 ที่ใช้บ่อย เอามากแจกต่อ อยากทราบที่มา ใช้ Google รูปภาพเลยครับ