<div class="side_element" style="display:block">
                                    <div class="menu_razdel">Курс голда<br><span>от 2013-12-12 12:24:54</span></div>

                                    <table width=100%>
                                        <tr><th>Цена</th><th>Кол-во</th></tr>
                                        <tr><th colspan=2>Продажа</th></tr>
                                                                                <tr><td>687 900</td><td>44</td></tr>
                                                                                <tr><td>687 600</td><td>10</td></tr>
                                                                                <tr><td>684 000</td><td>289</td></tr>
                                                                                <tr><td>683 000</td><td>34</td></tr>
                                                                                <tr><td>682 900</td><td>96</td></tr>
                                                                                <tr><td>682 500</td><td>17</td></tr>
                                                                                <tr><td>682 400</td><td>16</td></tr>
                                                                                <tr><td>681 000</td><td>5</td></tr>
                                                                                <tr><th colspan=2>РџРѕРєСѓРїРєР°</th></tr>
                                                                                <tr><td>646 000</td><td>15</td></tr>
                                                                                <tr><td>645 500</td><td>246</td></tr>
                                                                                <tr><td>645 000</td><td>3</td></tr>
                                                                                <tr><td>642 200</td><td>1</td></tr>
                                                                                <tr><td>642 100</td><td>1</td></tr>
                                                                                <tr><td>642 000</td><td>51</td></tr>
                                                                                <tr><td>641 400</td><td>1</td></tr>
                                                                                <tr><td>641 300</td><td>4</td></tr>
                                                                            </table>

                                    
                                    
                                    
                                            </div>                                

                                            

                                            
                                            
                                            <div class="side_element">
                                                
                        

                                                <div class="menu_razdel">Меню<br />

stroka.s=""
Dim stroka.s(3)  
      InitNetwork()
Filename$ = "C:\KOT.xml"
host$ = "http://pwcats.info/"
 If ReceiveHTTPFile(host$, Filename$)
   Debug "Success"
 Else
   Debug "Failed"
  EndIf
  Debug "======="
  OpenFile(220, "c:\KOT.xml") 
  While Eof(220)=0
 stroka=ReadString(220)

     b1=FindString(stroka, "<br><span>",1)
    If b1<>0:stroka(1)=stroka:
    c1=b1:EndIf
     
    b2=FindString(stroka,"colspan=2>РџРѕРєСѓРїРєР°</th></tr>",1)
     If b2<>0:stroka(2)=stroka:
     c2=b2:EndIf
  Wend 
 
k1.d=ValD(ReplaceString(Mid(stroka(1),c1+14,5),",","."))
k2.d=ValD(ReplaceString(Mid(stroka(1),c1+19,3),",","."))
k3.d=ValD(ReplaceString(Mid(stroka(1),c1+22,3),",","."))
k4.d=ValD(ReplaceString(Mid(stroka(1),c1+26,3),",","."))
k5.d=ValD(ReplaceString(Mid(stroka(1),c1+29,3),",","."))
k6.d=ValD(ReplaceString(Mid(stroka(1),c1+32,3),",","."))
k7.s=ReplaceString(Mid(stroka(2),c2,600),",",".")

 TextGadget(995, 25, 97, 524, 472, Str(k1)+Str(k2)+Str(k3)+Chr(32)+Chr(32)+Chr(32)+Str(k4)+Chr(58)+Str(k5)+Chr(58)+Str(k6)+Chr(32)+Chr(32)+Chr(32)+k7)