ความคิดเห็นที่ 8
 
ตอบพี่ Joey ก่อนครับ 
ถ้าไม่ใช้ Downloader อาจใช้ MetaStock Data Conversion CommandLine Utils แปลงข้อมูลได้ครับ
http://www.programmersheaven.com/download/36742/ZipFileList.aspx
http://www.geocities.com/mimansoor/MsCmdLineUtils.html
หรือใช้ MetaliB ก็ได้ครับ
เดี๋ยวนี้ผมไม่ค่อยมีเวลาตามเก็บข้อมูล
เลยใช้ Bat file แล้วตั้งเวลาไว้ให้มันโหลดเอง แล้ว convertให้เเสร็จ
+++++++++++++++++++++++++++++++++++++++++++++
ตัว Bat file ผมเอาcode มาให้เลย
@echo off
set Pdate=%date:~7,2%%date:~4,2%%date:~-4,4%
set Tdate=%date:~-4,4%%date:~4,2%%date:~7,2%
echo %Pdate%
WGET "http://realtime.bualuang.co.th/myeasy/realtime/quotation/txt/%Pdate%.txt"
move %Pdate%.txt YahooDL.txt
BLSch.exe
asc2ms -f data.txt -r r -o E:\MetaStockData\ThaiStocks
move YahooDL.txt %Tdate%bualuang.txt
move %Tdate%bualuang.txt backup\Bualuang
del data.txt
++++++++++++++++++++++++++++++++++++++++++++++
ส่วนตัว WGET.exe หาโหลดได้จากเวบครับ
ตัว BLSch.exe เปน perl ที่ผมเขียนเอง
จะให้code ไว้ครับ
$infh = open(INPUT, "YahooDL.txt");
$outfh = open(OUTPUT, "> data.txt");
while (<INPUT>)
{
if (! /[S][E][T][V]/ && ! /[S][E][T][7]/)
{
if (/^([S][E][T])\s+(\d\d\d\d\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+)\s+(\d+)/)
{
print OUTPUT $1.V.','."D".','.'20'.$2.','.$3.','.$4.','.$5.','.$6.','.$8/'1000'.','."0"."\n";
}
if (/^([A-Z]+[-][WPQ][1-5])\s+(\d\d\d\d\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+)/)
{
print OUTPUT $1.','."D".','.'20'.$2.','.$3.','.$4.','.$5.','.$6.','.$7.','."0"."\n";
}
if (/^([A-Z]+[-][D][R][1-5])\s+(\d\d\d\d\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+)/)
{
print OUTPUT $1.','."D".','.'20'.$2.','.$3.','.$4.','.$5.','.$6.','.$7.','."0"."\n";
}
if (/^([A-Z]+[-][WPQF])\s+(\d\d\d\d\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+)/)
{
print OUTPUT $1.','."D".','.'20'.$2.','.$3.','.$4.','.$5.','.$6.','.$7.','."0"."\n";
}
if (/^([A-Z]+)\s+(\d\d\d\d\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+)/)
{
print OUTPUT $1.','."D".','.'20'.$2.','.$3.','.$4.','.$5.','.$6.','.$7.','."0"."\n";
}
if (/^([A-Z]+[0-9])\s+(\d\d\d\d\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+)/)
{
print OUTPUT $1.','."D".','.'20'.$2.','.$3.','.$4.','.$5.','.$6.','.$7.','."0"."\n";
}
if (/^([A-Z 0-9]+[-][0-9]+)\s+(\d\d\d\d\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+.\d\d)\s+(\d+)/)
{
print OUTPUT $1.','."D".','.'20'.$2.','.$3.','.$4.','.$5.','.$6.','.$7.','."0"."\n";
}
}
}
close INPUT;
close OUTPUT;
++++++++++++++++++++++++++++++++++++++++++
ถ้ามีคนสนใจ ติดต่อที่ log in GABLIEL ครับ
(ตอนนี้ผมใช้เครื่องนั้นไม่ได้)
++++++++++++++++++++++++++++++++++++++++++++++++++++++
คุณ tHeNuT ใช้ Bat file ทำการ Unzip แล้ว รวมข้อมูลเป็น fileเดียวกัน
ค่อยConvert ทีเดียวก็ได้ครับ
แต่ file จะใหญ่หน่อยนะครับ อย่าไปคลิกเปิด บางทีเครื่องจะแฮงค์
จากคุณ :
weekest 
- [
16 พ.ค. 52 13:32:04
]
|
|
|
