欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久

打開(kāi)APP
userphoto
未登錄

開(kāi)通VIP,暢享免費電子書(shū)等14項超值服

開(kāi)通VIP
網(wǎng)頁(yè)里表格的數據通過(guò)delphi寫(xiě)的程序導入到數據庫中去

網(wǎng)頁(yè)里表格的數據通過(guò)delphi寫(xiě)的程序導入到數據庫中去

時(shí)間:2011-5-30來(lái)源:yang 作者: peng點(diǎn)擊: 64次

怎么樣把網(wǎng)頁(yè)里表格的數據通過(guò)delphi寫(xiě)的程序導入到數據庫中去。樓主caoshangfei(草上飛)2002-08-11 20:34:04 在 Delphi / 數據庫相關(guān) 提問(wèn)
 
  如有這樣的網(wǎng)頁(yè)  
  學(xué)號         姓名          
  1111         ttt  
  需要導入到student.db中去,學(xué)號對應student.db中的number字段,姓名對應username字段。。

=======================================
5 樓CDSoftwareWj(95927)回復于 2002-08-21 10:03:29 得分 35uses   mshtml,   ActiveX;  
   
  procedure   TForm1.FormCreate(Sender:   TObject);  
  begin  
      WebBrowser1.Navigate(‘http://www.delphibbs.com‘);  
  end;  
   
  procedure   TForm1.Button1Click(Sender:   TObject);  
  var  
      HTMLDocument:   IHTMLDocument2;  
  begin  
          HTMLDocument   :=   WebBrowser1.Document   as   IHTMLDocument2;  
          Memo1.Text   :=   HTMLDocument.body.innerText; //直接把所有文本拷貝到MEMO中  
  end;  
   
  procedure   TForm1.Button2Click(Sender:   TObject);  
  begin  
      WebBrowser1.ExecWB(OLECMDID_SELECTALL,   OLECMDEXECOPT_PROMPTUSER,   EmptyParam,   EmptyParam);   //選擇全部  
      WebBrowser1.ExecWB(OLECMDID_COPY,   OLECMDEXECOPT_PROMPTUSER,   EmptyParam,   EmptyParam);   //拷貝到剪貼板  
  end;  
   
  希望對你有點(diǎn)幫助

本站僅提供存儲服務(wù),所有內容均由用戶(hù)發(fā)布,如發(fā)現有害或侵權內容,請點(diǎn)擊舉報。
打開(kāi)APP,閱讀全文并永久保存 查看更多類(lèi)似文章
猜你喜歡
類(lèi)似文章
delphi中WebBrowser的parent改變時(shí)變成空白問(wèn)題的解決
基于Delphi的Excel動(dòng)態(tài)報表技術(shù)
Delphi XE6 通過(guò)JavaScript API調用百度地圖
Delphi中WebBbrowser的編程
老文章——TWebBrowser編程簡(jiǎn)述 - 張碩(CathyEagle)的專(zhuān)欄 - CS...
Delphi與Excel的親密接觸--Lark工作室
更多類(lèi)似文章 >>
生活服務(wù)
分享 收藏 導長(cháng)圖 關(guān)注 下載文章
綁定賬號成功
后續可登錄賬號暢享VIP特權!
如果VIP功能使用有故障,
可點(diǎn)擊這里聯(lián)系客服!

聯(lián)系客服

欧美性猛交XXXX免费看蜜桃,成人网18免费韩国,亚洲国产成人精品区综合,欧美日韩一区二区三区高清不卡,亚洲综合一区二区精品久久