Ò׽ؽØͼÈí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

DelphiÓëXMLÎĵµ

ͬ²½³ÌÐò°¸Àý
procedure TGetOrderThread.PostDB(webnr:WideString);
var
  Err: String;
  SetWebnr:WideString;
  xmlDoc: IXMLDocument;
  root: IXMLNode;
  rowc: IXMLNode;//¼Ç¼Êý
  rows: IXMLNodeList;//Ö÷¼Ç¼Áбí
  row: IXMLNode;
  drows: IXMLNodeList;//Ã÷ϸÁбí
  drow: IXMLNode;
  i,j,slhj,jlhj:integer;
  djhj:real;
begin
  //ͬ²½Êý¾Ý
  xmlDoc := TXMLDocument.Create(nil);
  try
    xmlDoc.XML.Text:=Webnr;
    xmlDoc.Active:=true;
    root:=xmlDoc.DocumentElement;
    rowc:=root.ChildNodes.FindNode('RowC');
    if (rowc.NodeValue>0) and DBconn then
    begin
      rows:=root.ChildNodes.FindNode('RowS').ChildNodes;
      //showmessage('¼Ç¼Êý:'+rowc.NodeValue);
      for i:=0 to rows.Count-1 do
      begin
        ADOConn.BeginTrans;
        try
          row:=rows.Nodes[i];
          drows:=row.ChildNodes.FindNode('Drows').ChildNodes;
          //showmessage(row.ChildValues['billno']+
          //  ' Ã÷ϸ¼Ç¼Êý:'+inttostr(drows.Count));//ÏÔʾ¶©µ¥ºÅ
          if SHelper.Active then SHelper.Close;
          SHelper.SQL.Text:=Format(selectStr,[row.ChildValues['billno']]);
          SHelper.Open;
          jlhj:=0;
          slhj:=0;
          djhj:=0;
 &nb


Ïà¹ØÎĵµ£º

asp¡¢delphi¡¢oracleµÄ¼¼ÊõÎĵµ×ܽá

1) DelphiÏòoracleÖд«µÝ²ÎÊý ÈçoracleÖеIJÎÊýÃûΪerpcx 
´ð£ºÈç¹ûÏë´Ó±íÀïÈ¡Öµµ½oracle£¬Ôòerpcx:=trim(aq1.fieldbyname('erpcx').AsString);
·ñÔòÖ±½ÓÓÿؼþÃû×Ö
Óï¾äΪ
with aperp do    
begin
connection:=dm.ADOCerp;      
parameters.Clear;&nbs ......

Delphi¶à²ã¿ª·¢·½°¸±È½Ï


±êÌâ
  Delphi¶à²ã¿ª·¢·½°¸±È½Ï    £¨×ªÔØ£©
¹Ø¼ü×Ö
  Delphi¶à²ã¿ª·¢·½°¸±È½Ï
³ö´¦
 
·½°¸->
Midas
DCOM
COM+
ASTA
RemoteObject
.NET
ÌṩÕß
Borland
΢Èí
΢Èí
http://www.astatech.com
http://www.remobjects.com
΢Èí
ºËÐļ¼Êõ
COM
COM
COM
ASTA×Ô¼ ......

OpenXml¿ª·¢ Ò»¸öÓ¦ÓÃXmlµÄÀý×Ó


  3private XmlDocument xmlDoc;
  4        //load xml file
  5        private void LoadXml()
  6        { ......

ASP.NET ÑÝÁ·£º´´½¨ÍøÒ³ÒÔÏÔʾ XML Êý¾Ý


Êý¾Ýͨ³£ÊÇÒÔ XML ¸ñʽÌṩ¸ø Web Ó¦ÓóÌÐòµÄ¡£µ«ÊÇ£¬XML Êý¾Ý±¾ÖÊÉÏÊÇ·Ö²ãµÄ£¬Òò´ËÄú¿ÉÄÜÏ£ÍûÄܹ»ÔÚ»ùÓÚÁбíµÄ¿Ø¼þÖÐʹÓà XML Êý¾Ý£¬Èç GridView »ò DropDownList ¿Ø¼þ¡£´ËÑÝÁ·ÑÝʾÈçºÎ½« XML Êý¾ÝÊÓΪ±í¸ñÊý¾Ý¿â±íÖеÄÊý¾Ý½øÐд¦Àí¡£
 
ͨ¹ý´ËÑÝÁ·£¬Äú½«Ñ§»áÈçºÎÖ´ÐÐÒÔÏÂÈÎÎñ£º
·Ê¹ÓÃÊý¾ÝÔ´¿Ø¼þ¶ÁÈ¡ XM ......

delphi ¿ØÖÆ·Ö²¼Ê½Êý¾Ý¿âͨÐÅ·½Ê½

Ò»¡¢     ÍøÂç²¼¾Ö
   һ̨ÖÐÐÄSQL·þÎñÆ÷£¨¼ò³Æ£ºÖÐÐÄ·þÎñÆ÷£©£¬¶ą̀·Ö²¼ÔÚ²»Í¬µØÓòµÄSQL·þÎñÆ÷£¨¼ò³Æ£º±¾µØ·þÎñÆ÷£©£¬¸÷¸ö±¾µØ·þÎñÆ÷ºÍÖÐÐÄ·þÎñÆ÷¶¼ÄÜͨ¹ýinternetʵÏÖÍøÂ绥Á¬¡£
¶þ¡¢ËùÓÃÓïÑÔ¼°Êý¾Ý¿â£ºDelphi +Sql
¶þ¡¢     ͨÐÅÒªÇó
   ÿ̨±¾µØ·þÎñÆ ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØͼ | ¸ÓICP±¸09004571ºÅ