จะหาราคาปิดของหุ้นได้ที่ไหนครับ

[MO101]

ตอนนี้หาเอาใน นสพ
รู้สึกไม่ค่อยสะดวกอะครับ ตาลาย
ไม่ทราบว่าใน เว็บนี่พอมีไหมครับ

[ครรชิต ไพศาล]

สำหรับเพื่อนๆ ที่ Download ฐานข้อมูลหุ้น ที่ผมให้ไป


วิธี Update ราคาปิดประจำวัน ของ ข้อมูลหุ้นที่ให้ Download ไป

สำหรับการ Update ราคา

Price file ของตลาดหลักทรัพย์อยู่ที่
http://www.set.or.th/static/market/market_u10.html
ตรงข้อความ
Click here to download all stock quotes (unofficial). Daily updated on 17:15 (GMT+7).


หลังจาก คัดลอก เอาไปแล้ว ใช้ ms word "วางพิเศษ" "ข้อความที่ไม่จัดรูปแบบ" "บันทึกเป็น" "MS-dos text" สมมุติชื่อ A.txt


แล้วใช่ EXCEL OPEN "A.TXT" "ความกว้างคงที่"

เมื่อเปิดได้แล้ว

SYMBOL PRIOR OPEN HIGH LOW LAST CHG %CHG VOL (SHARES) VAL ('000 BAHT) #DEAL
AA 14.75 15 15 15 15 0.25 1.69 178 267 17800
AA-F 14.5 - - - - - - - - -
ABICO 1 - - - - - - - - -
ABICO-F 6 - - - - - - - - -
ACL 8.7 8.8 9.2 8.7 9.1 0.4 4.59 172380 154345 17238000


แต่ตาราง TODAY เป็น

NAME PRIOR OPEN HIGH LOW CLOSE VOL*100 VAL LASTDATE
AA 15.1 15 15.1 15 15.1 706 1062 18/6/2003
AA-F 18 18/6/2003
ABICO 1 18/6/2003
ABICO-F 6 18/6/2003
ACL 5.2 5.2 5.3 5.1 5.3 46716 24476 18/6/2003

( ตรงนี้ขอเน้น ให้ทำให้ถูกต้อง)
%%%%%%%%%
เพื่อนก็จัด คอลัมพ์ให้ตรงกัน และเพิ่ม คอลัมพ์ วันที่เข้าไปโดยต้องเป็น รูปแบบ d/m/yyyy ต้องเป็นรูป พ.ศ. เช่น 21/6/2546
%%%%%%%%%
จัดเก็บ ให้เป็นแฟ้มของ Excel เช่นชื่อ A.xls

เปิด Access หุ้น
รับข้อมูลภายนอก นำเข้า A.XLS
เลือกช่อง Fisrt Low Contains Column Heading
เลือกช่อง In a New Table
Next
Next
ช่อง Indexed เลือก ไช่(ค่าซ้ำไม่ได้)
Next
เลือกช่อง Choose My Primary Key
Next
Finish

เราจะได้ Table ชื่อ A โดยที่ มี - - อยู่

ไปที่ Table A คำสั่ง ออกแบบ

ต้องกำหนดที่ช่อง ชนิดข้อมูล ของ ชื่อเขตข้อมูล PRIOR OPEN HIGH LOW CLOSE VOL*100 VAL ให้เป็นข้อมูลประเภทตัวเลข Number

กด บันทึก โปรแกรมจะบอกว่ามีข้อความผิดพลาด ตอบ ใช่

มาถ้าขั้นตอนนี้ ตัว ขีด ก็จะถูกกำจัดหมดไป ก็ คัดลอกไปลงใช้งานใน ตาราง TODAY ได้แล้ว


ก่อนนำมาวาง ก็ คัดลอก ข้อมูลเก่าใน TODAY ไปเก็บเป็นชื่อ วันที่นั้นๆ เสียก่อน (ถ้าต้องการเก็บ)
แล้วทำให้ TODAY ว่าง จึง ทำการ ไป วางการเชื่อมต่อ

และสำหรับ เพื่อนๆ ที่ต้องการ ส่ง PRICE FILE ไปให้โปรแกรม QUICKEN จะใช้ update ราคา ใน portfolio ทำได้ดังนี้

สร้าง แบบสอบถาม ชื่อ PRICE โดยมี 2 Fild โดยใช้ TABLE TODAY

NAME CLOSE
AA 15.10
AA-F 18.00
ABICO 1.00

โดย ใช้ คำสั่ง CLOSE: IIf([TODAY]![CLOSE]>0,[TODAY]![CLOSE],[TODAY]![PRIOR])

เมื่อได้ แบบสอบถาม ชื่อ PRICE แล้วก็เปิด ขึ้นมา

ส่งออกเป็น text file โดยคำสั่ง "แฟ้ม" "บันทึกเป็น/การส่งออก"


"ไปยังแฟ้มหรือฐานข้อมูลภายนอก" "ตกลง"


ระบุชื่อแฟ้ม เช่น "C:\PRICE" ระบุชนิดของแฟ้ม "text files" "ตกลง"

"Finish"

เป็นอันว่าได้ C:\price.txt ที่มีรูปแบบที่ Quicken รับได้

ไปเปิด Quicken เขาไปที่ portfolio ใช้คำสั่ง "File" "Import" "Import Prices" "C:\PRICE.TXT" "OK"

เป็นอันเรียบร้อย ลองทำดูครับ

[MO101]

ขอบคุณครับ

แล้วถ้ามีการ update พวก ปันผล EPS อันนี้ต้องทำอย่างไรครับ
หรือว่าต้องขอ DATA BASE ของพี่บ่อยๆ

[pm]

http://www.set.or.th/static/market/mark ... html?sym=S