เลยอยากถามว่าถ้าเอา เจ้าคำสั่งพวกนี้ไปใช้ใน Code VB ใส่ไว้ในตัวเเปรชนิด String เเล้วติดต่อ DB ธรรมดาเเบบปกติ
เราจะได้ Data Set ที่มี DataTable กี่ตารางอะค่ะ
OPEN vac_id_cursor; 'เปิดใช้งาน cursor vac_id_cursor
FETCH NEXT FROM vac_id_cursor INTO @vac_id_temp 'เริ่มรับค่า vac_id_cursor เข้าตัวแปล @vac_id_temp
WHILE @@FETCH_STATUS=0 'เข้า loop while ว่า ว่าจนกว่า @@FLTCH_STATUS จะเท่ากับศูนย์ ใ้ห้ทำข้างล่างนี้
BEGIN 'เริ่มกันเลย
SELECT SUM(vaccine_quantity)AS vac_quan, @vac_id_temp AS vac_id FROM vaccine WHERE @vac_id_temp = vac_no 'เลือกรวมค่า vaccine_quantity เป็น field ใหม่ ชื่อ vac_quan, เอาค่า vac_id_temp มาเป็น field ด้วย WHERE @vac_id_temp = vac_no เฮ้อออ งงมั้ย
เช่น ถ้า VC0001 ก็ summary ค่า vaccine_quantity มาให้ด้วย
FETCH NEXT FROM vac_id_cursor INTO @vac_id_temp 'เปลี่ยนค่า vac_id_cursor เป็น ค่าต่อไป เช่น VC0002
END;
CLOSE vac_id_cursor;
DEALLOCATE vac_id_cursor;
GO