C++/CLI บน Access 2003 Advance

โปรแกรมตรวจสอบโครงการเศรษฐกิจชุมชน เหมาะสำหรับนักพัฒนาชุมชนทั่วประเทศ (คุณเลิศพงศ์ 080-7428876 โปรแกรมละ 1,000 บาท)

 

ผมพยายามหลายรูปแบบจนเจอขุมทรัพย์คลังปัญญาด้านอัจฉริยภาพทาง Software ว่าหิน ๆๆ ของ C++/CLI ว่ามันอยู่ตรงนี้นั่นเอง
==================================
นี่คือตัวอย่างบางตอนที่ผมทำได้เหมือนโปรแกรมฝรั่งแล้ว

 

มีคนสนใสภาษานี้มากเพราะว่ามันควบคุมเครื่องจักรกลได้ ฟังก์ชั่นเยอะมากหากใช้เป็น

 

เมื่อวานไปดูเครื่องจักรกลควบคุมการบรรจุนมกล่อง ภายใต้ชื่อ นมโรงเรียน (ฟาร์มผลิตโคนมอำเภอวาริชภูมิ อำเภอวาริชภูมิ จังหวัดสกลนคร) เขาบอกว่าเครื่องจักรกลตัวหนึ่ง 20 ล้านบาท ถูกเขียนด้วย C++/CLI ทั้งนั้น

 

แล้วทีนี้เงินเดือน คนที่เขียนโปรแกรมนี้ (C++/CLI) ไม่ต้องพูดถึงเลยครับ มากกว่าคนเขียน VB.NET ,C#.NET

 

ในประเทศไทยยังไม่มีคนเขียนภาษา C++/CLI ที่เป็น Advance ได้เลยเท่าที่เช็คดูมา

 

หากผมเขียนเป็นผมจะนำมาบอกคนไทย 60 ล้านคนว่าเขียนอย่างไรให้เหมือนฝรั่งเขาเขียนมาให้เราใช้ได้ ครับ

 

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

 

Code Demo บางอย่าง
===================================
//=============Load Data=====================
OleDbConnection^ oleDbConnection;
OleDbCommand ^ oleDbCommand;
OleDbDataReader^ oleDbDataReader;
strConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\Economic.mdb";
try{
String^ strQuery = "SELECT * FROM tblEconomic " +
"Where " + //เพิ่มมาใหม่
"(GroupName Like '%" + txtSearch->Text + "%') ORDER BY CodeID ";//เพิ่มมาใหม่
oleDbConnection = gcnew OleDbConnection(strConnection);
oleDbConnection->Open();
oleDbCommand = gcnew OleDbCommand(strQuery, oleDbConnection);
oleDbDataReader = oleDbCommand->ExecuteReader();
while(oleDbDataReader->Read()){
ListViewItem^ item = gcnew ListViewItem(oleDbDataReader["id"]->ToString());
item->SubItems->Add(oleDbDataReader["CodeID"]->ToString());
item->SubItems->Add(oleDbDataReader["BudgetYear"]->ToString());
item->SubItems->Add(oleDbDataReader["GroupID"]->ToString());
item->SubItems->Add(oleDbDataReader["GroupName"]->ToString());
item->SubItems->Add(oleDbDataReader["FullNameHeader"]->ToString());
item->SubItems->Add(oleDbDataReader["Moo"]->ToString());
item->SubItems->Add(oleDbDataReader["Contract"]->ToString());
item->SubItems->Add(oleDbDataReader["PaymentDay"]->ToString());
item->SubItems->Add(oleDbDataReader["MoneyTotal"]->ToString());
item->SubItems->Add(oleDbDataReader["MoneyYear1"]->ToString());
item->SubItems->Add(oleDbDataReader["MoneyYear2"]->ToString());
item->SubItems->Add(oleDbDataReader["MoneyYear3"]->ToString());
item->SubItems->Add(oleDbDataReader["MoneyYear4"]->ToString());
item->SubItems->Add(oleDbDataReader["MoneyYear5"]->ToString());
listView1->Items->Add(item);
}

 

Code Demo
=================================
//===========ชำระงวดที่ 1=======================
for each( ListViewItem ^ lvi in listView1->Items)
{
ListViewItem::ListViewSubItem ^ SubItem = lvi->SubItems[10];
PayAmount1 += double:arse(SubItem->Text);
}
//===========================================

 

Code Demo
===========================
oleDbCommand = gcnew OleDbCommand("Update tblEconomic set " +
"id=@id,CodeID=@CodeID,BudgetYear=@BudgetYear, " +
"GroupID=@GroupID,GroupName=@GroupName, " +
"FullNameHeader=@FullNameHeader,Moo=@Moo, " +
"Contract=@Contract,PaymentDay=@PaymentDay, " +
"MoneyTotal=@MoneyTotal, " +
"MoneyYear1=@MoneyYear1, " +
"MoneyYear2=@MoneyYear2, " +
"MoneyYear3=@MoneyYear3, " +
"MoneyYear4=@MoneyYear4, " +
"MoneyYear5=@MoneyYear5 " +
"Where " +
"([id] Like '%" + txtSearch->Text + "%') " +
"", oleDbConnection);

oleDbCommand->Parameters->Add(gcnew OleDbParameter(L"id", SqlDbType::VarChar));
oleDbCommand->Parameters["id"]->Value = txtSearch->Text;

oleDbCommand->Parameters->Add(gcnew OleDbParameter(L"CodeID", SqlDbType::VarChar));
oleDbCommand->Parameters["CodeID"]->Value = txtSearch->Text->PadLeft(7, '0');//แก้ปัญหาการ Update มีแต่ตัวเลข เพียวๆ ->PadLeft(7, '0')

 

ปัญหาคนเขียน C++/CLI แบบยังไม่ชำนาญจำแนกได้เป็นดังนี้

 

1.หาวิธี Connect DataBase ไม่เจอหรือไม่เป็น

 

2.หาวิธีการบันทึก/แก้ไข/ลบ/ค้นหา ไม่ถูกวิธี

 

3.ที่ขาดไม่ได้คือ การรายงานผลตามข้อมูล ไม่มีตัวอย่างให้ลอกทาง Website หรือ คนอื่นทำไว้แล้วหาไม่เจอในเน็ตหรือหลายๆอย่าง

 

4.ที่แปลกคือ ข้อมูลนำมาแสดงแล้วไม่สัมพันธ์หรือใช้งานไม่ได้เลย หรือ ไม่รู้เรื่องอะไรประมาณนี้

 

5.คุณจะบวก,ลบ,คูณและหาร แบบเพียวๆใน SQL (MS Access) เหมือนฐานข้อมูล SQL Server ไม่ได้

 

จึงสรุปไปเลยว่าภาษา C++/CLI แบบบอกว่ายากไปเลยหรือไม่มีคนพัฒนาไปเลยก็ว่าได้

 

วิธีแก้ปัญหาต่างแบบคร่าวเผื่อนำไปพัฒนาโปรแกรมแบบหินๆเหมือนผม

 

โหลด data
==================================
private :
void LoadData(){
//=============Load Data=====================
OleDbConnection^ oleDbConnection;
OleDbCommand^ oleDbCommand;
OleDbDataReader^ oleDbDataReader;
strConnection = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\\Economic.mdb";//Data Source=..\\Economic.mdb";
try{
String^ strQuery = "SELECT id, CodeID, BudgetYear, GroupID, GroupName, " +
"FullNameHeader,Moo,Contract,PaymentDay,MoneyTotal , " +
"MoneyYear1,MoneyYear2,MoneyYear3,MoneyYear4,MoneyYear5 " +
"FROM tblEconomic ";
// "Where " + //เพิ่มมาใหม่
// "(FirstName Like '%" + txtSearch->Text + "%')";//เพิ่มมาใหม่
oleDbConnection = gcnew OleDbConnection(strConnection);
oleDbConnection->Open();
oleDbCommand = gcnew OleDbCommand(strQuery, oleDbConnection);
oleDbDataReader = oleDbCommand->ExecuteReader();

String^ name;
while(oleDbDataReader->Read()){
name = oleDbDataReader["id"]->ToString();
}
oleDbDataReader->Close();

}
catch(Exception^ e){
MessageBox::Show(e->Message, "Error", MessageBoxButtons::OK, MessageBoxIcon::Error);
return;
}
finally{
oleDbConnection->Close();
if(oleDbDataReader != nullptr){
oleDbDataReader->Close();
oleDbDataReader = nullptr;
}
if(oleDbCommand != nullptr){
oleDbCommand = nullptr;
}
}
}