select รูปภาพ ได้อย่างไร

[arr_012]

 คือ ผมต้องการ ดึงรูปภาพที่ได้ถ่ายไว้ตอนที่มาทำประวัติ ที่ตาราง select * from patient_image   ผมจะสามารถนำภาพออกมา ได้อย่างไรครับ 

[arr_012]

อันนี้ผมลองใช้ Navicat Premium แต่ต้องเลือกที่ละคน อ่ะ ครับ

[chitvichai]

โค๊ด: [Select]


< ?php
$location="/home/jgoddard/Desktop/images/";

$db = mysql_pconnect("localhost","user","password");
mysql_select_db("images",$db);

$sql="SELECT imageid, image from images";

$rs = mysql_query($sql,$db);

echo "<h2>EXPORTING INTO $location</h2>";
$counter=0;
while ($row=mysql_fetch_object($rs)) {
$filename=$location.$row->imageid.”.jpg”;
$file=fopen($filename,’w');
if (fwrite($file,$row->image)) {
echo $filename.”<br />”;
$counter++;
}
}

echo “<h2>$counter images exported</h2>”;
? >


[por]

นำออกรายงานใช่ใหมครับ

[Multithreading]

ดึงออกมาเป็นไฟล์  โดยใช้ vb6 ครับ
-----------------------------------------------

Dim strcon As String
    strcon = "Driver={MySQL ODBC 5.1 Driver};Server=192.168.5.100;Port=3306;Database=hos;User=sa; Password=sa;Option=3;"
    Dim conn As New ADODB.Connection
    conn.ConnectionString = strcon
    conn.CursorLocation = adUseClient
    If conn.State = adStateOpen Then conn.Close
    conn.Open
    Dim rs As New ADODB.Recordset
    Dim mystream As New ADODB.Stream
    mystream.Type = adTypeBinary
    rs.Open "select * from patient_image", conn
       If Not rsEOF Then rs.MoveFirst
       Dim i As Integer
       i = 0
        Do While Not rs.EOF
            mystream.Open
            mystream.Write rs!Image
            mystream.SaveToFile "c:\\newimage" & i & ".gif", adSaveCreateOverWrite
            mystream.Close
              i = i + 1
            rs.MoveNext
        Loop
    rs.Close
    conn.Close

[manoi]

ถ้าจะ save รูปออกมาก็ลองเอา Script นี้ไป run นะครับ ใน Tab DFM ให้ clear ออกให้หมดก่อนครับ เอา Script นี้ไปปะไว้ในช่อง Source แล้วกดปุ่ม Execute ครับ


program test;
var tc:tclientdataset;
     SavePath:String;
begin
   SavePath:='d:\temp\';
   tc:=tclientdataset.create(nil);
   tc.data:=hosxp_getdataset('select * from patient_image');
   while not tc.eof do
   begin
     tblobfield(tc.fieldbyname('image')).savetofile(SavePath+tc.fieldbyname('hn').asstring+'.jpg');
     tc.next;
   end;
   tc.free;
   showmessage('Done.');

end;

end.

[เกื้อกูล ครับ..]

สุดยอดครับ..อาจารย์ชัยพร....ภาพมาเยอะมากเลย...

[udomchok]

สุดยอดครับ..อาจารย์ชัยพร....ภาพมาเยอะมากเลย...

ก็เท่าที่มีใน patient_image และครับ

[เกื้อกูล ครับ..]

สุดยอดครับ..อาจารย์ชัยพร....ภาพมาเยอะมากเลย...

ก็เท่าที่มีใน patient_image และครับ

ของผมได้มาจากระบบ smartcard พอสมควรครับ...