找回密码
 加入
搜索
AUTOIT CN»论坛 › AU3交流 › 『 提问交流 』 › 关于for next双循环写入配置文件，第二个for的值一样？ ...
返回列表 发新帖
查看: 1982|回复: 3

[AU3基础] 关于for next双循环写入配置文件，第二个for的值一样？？

[复制链接]
Netfox
发表于 2011-1-26 00:48:17 | 显示全部楼层 |阅读模式 
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>产品订购 -XX科技有限公司</title>
<link href="images/css.css" rel="stylesheet" type="text/css" />
<script language="JavaScript">
function check(){
  if(confirm("友情提醒：\n\n您确认需要以上商品吗？如无质量问题恕不退货。\n\n如还需其他商品请点“取消”，继续购物！~")){
        //document.form1.send_tc.disabled=true;
        //document.form1.send_tc.value="正在发送 请稍候..."
        return true;
  }
  else{
          return false;
  }
} 
</script>
</head>

<body><table width="98%" border="0" align="center" cellpadding="0" cellspacing="8">
  <tr>
    <td width="70%"><table width="100%" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td style="border:#D5D5D5 solid 1px; background-color:#F0F0F0; padding:10px;"><span style="font-weight:bold;">订单时间:</span><u>2011-1-26 0:25:40</u>　　　<span style="font-weight:bold;">单据编号:</span> <u>2011012600254038763</u><br />
          <iframe name="i_order" src="iframe_order.asp" width="100%" height="168" border="0"  frameborder="0" scrolling="auto"></iframe>
          <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><table border="0" width="100%" id="table23" cellspacing="0" cellpadding="0" style="margin-top:0px;">
<form name="form1" method="post" action="order.asp" target="_blank" onSubmit="return check()">                
        <tr>
                <td align="center">订单说明:<span style="font-size: 9pt"><font color="#000080"><input name="OrderInfo" type="text" class="input" id="OrderInfo" size="30" maxlength="100" >
                </span> 货    运:
        <select name='deliver' size="1" id="deliver" style="font-size: 9pt">
                                                       <option value="未指定" selected>未指定</option>

<option value="思运快递（宁绍台金）">思运快递（宁绍台金）</option>

<option value="千一物流">千一物流</option>

<option value="韵达快运">韵达快运</option>

<option value="顺丰速运">顺丰速运</option>

<option value="全一快递">全一快递</option>

<option value="潮日（衢）">潮日（衢）</option>

<option value="鑫飞鸿速递">鑫飞鸿速递</option>

<option value="圆通快递">圆通快递</option>

<option value="余姚">余姚</option>

<option value="安泰（舟山">安泰（舟山</option>

<option value="小神州 (衢州）">小神州 (衢州）</option>

<option value="大神州 （丽水）">大神州 （丽水）</option>

<option value="强通">强通</option>

<option value="藏建">藏建</option>

<option value="杭星">杭星</option>

<option value="新联通">新联通</option>

<option value="杭新">杭新</option>

<option value="红奇">红奇</option>

<option value="圣通">圣通</option>

<option value="中通">中通</option>

<option value="申通">申通</option>

<option value="罗国大">罗国大</option>

<option value="边成旺 (收货时间:12:00-13:20 )">边成旺 (收货时间:12:00-13:20 )</option>

<option value="天天快递">天天快递</option>

<option value="小红奇">小红奇</option>

<option value="杭波">杭波</option>

<option value="至上">至上</option>

<option value="阿忠">阿忠</option>

<option value="蓝帽子">蓝帽子</option>

<option value="祥宝">祥宝</option>

<option value="便捷">便捷</option>

<option value="中慈">中慈</option>

<option value="材胜">材胜</option>

<option value="万家">万家</option>

<option value="新同城">新同城</option>

<option value="石诚">石诚</option>

<option value="山雄">山雄</option>

<option value="昌化">昌化</option>

<option value="大头">大头</option>

<option value="中旗">中旗</option>

<option value="兄弟（温州）">兄弟（温州）</option>

<option value="诸暨(11：30)">诸暨(11：30)</option>

<option value="萧山">萧山</option>

<option value="汇通">汇通</option>

<option value="吉安达">吉安达</option>

<option value="香港快捷">香港快捷</option>

<option value="上门自提">上门自提</option>

<option value="当天客运：">当天客运：</option>

<option value="老刘货运">老刘货运</option>

        </select> 
        指定货运:
        <input name="other_deliver" type="text" class="input" id="Other_Shopping" size="17" >
                <input name="orderdate" type="hidden" value="2011-1-26 0:25:40" /><input name="orderId" type="hidden" value="2011012600254038763" />
                <input type="submit" name="send_tc" value="发送订单给天城" class="botton">
                </td>
                </tr></form>
</table>
</td>
  </tr>
</table>
          </td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="90%" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><form id="form2" name="form2" method="get" target="i_product" action="iframe_product.asp">
      <label>
        商品名称：<input name="keyword" type="text" id="keyword"  size="40" value="请输入关键字..." onFocus="if(this.value=='请输入关键字...') this.value='';" />
      </label>
      <label>
        <input name="classid" type="hidden" value="0" /><input type="submit" name="button" id="button" value="搜索" />
      </label>
    </form></td>
  </tr>
</table>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="4">
  

   <tr>
   
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=685" class="i_product" target="i_product">通知</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=453" class="i_product" target="i_product">特价区 天天惊喜</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=51" class="i_product" target="i_product">显示器</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=48" class="i_product" target="i_product">主板</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=64" class="i_product" target="i_product">显卡</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=81" class="i_product" target="i_product">CPU</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=72" class="i_product" target="i_product">内存</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=264" class="i_product" target="i_product">硬盘</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=190" class="i_product" target="i_product">CPU风扇</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=155" class="i_product" target="i_product">光驱</a></td>
    
    </tr>
 
   <tr>
   
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=94" class="i_product" target="i_product">音箱</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=90" class="i_product" target="i_product">机箱+电源</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=100" class="i_product" target="i_product">键盘鼠标</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=159" class="i_product" target="i_product">摄像头</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=182" class="i_product" target="i_product">耳机.麦克风</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=177" class="i_product" target="i_product">手写板</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=106" class="i_product" target="i_product">路由器 网卡</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=202" class="i_product" target="i_product">网线</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=307" class="i_product" target="i_product">网络配件</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=1" class="i_product" target="i_product">品牌台式机 电询</a></td>
    
    </tr>
 
   <tr>
   
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=2" class="i_product" target="i_product">笔记本 电询</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=280" class="i_product" target="i_product">监控产品</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=271" class="i_product" target="i_product">U盘 数码卡</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=203" class="i_product" target="i_product">小线材</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=205" class="i_product" target="i_product">插座</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=208" class="i_product" target="i_product">各类电源适配器</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=300" class="i_product" target="i_product">各类小件</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=554" class="i_product" target="i_product">客户 建议区 投诉区</a></td>
    
    <td height="22" align="center" bgcolor="#000099" style="color:#FFFFFF"><a href="iframe_product.asp?classid=698" class="i_product" target="i_product">日常用品</a></td>
    
</table>
<table width="98%" border="0" align="center" cellpadding="0" cellspacing="8">
  <tr>
    <td><iframe name="i_product" width="100%" height="600" border="0" frameborder="0" scrolling="auto"> 浏览器</iframe></td>
  </tr>
</table>
<!-- Live800在线客服图标:产品购买页代码[浮动型] 开始-->
<!--<div style='display:none;'><a href='http://www.live800.com'>在线客服</a></div><script language="javascript" src="http://chat10.live800.com/live800/chatClient/floatButton.js?jid=7526744554&companyID=93904&configID=162719&codeType=custom"></script><div style='display:none;'><a href='http://www.live800.com'>在线客服系统</a></div>-->
<!-- Live800在线客服图标:产品购买页代码[浮动型] 结束-->
<!-- Live800默认跟踪代码: 开始-->
<!--<script language="javascript" src="http://chat10.live800.com/live800/chatClient/monitor.js?jid=7526744554&companyID=93904&configID=162718&codeType=custom"></script>-->
<!-- Live800默认跟踪代码: 结束-->
<span style="display:none"><script language="javascript" src="http://count22.51yes.com/click.aspx?id=229083475&logo=12"></script></span>
</body>
</html>
以上是Sourcedata.tmp的内容
以下是双FOR NEXT循环。。。。
$data = FileRead(@ScriptDir & "\Sourcedata.tmp")
        $title = StringRegExp($data, '<td .+arget="i_product">(.*?)</a></td>', 3)
        $url = StringRegExp($data, '<a href="(.+?)"\s[class="i_product"][^>]*>', 3)
        For $i = 0 To UBound($title) - 1
                For $k = 0 To UBound($url) - 1
                        IniWrite("BigClass.db", "BigClass", $title[$i], $url[$k])                        
                Next
        Next
        FileDelete(@ScriptDir & "\Sourcedata.tmp")
写入BigClass.db后得到的内容，连接地址都一个结果。但是用MSGBOX打印出$url[$k]是每次结果不一样的。


以下是BigClass.db的内容。
[BigClass]
通知=iframe_product.asp?classid=685
特价区 天天惊喜=iframe_product.asp?classid=685
显示器=iframe_product.asp?classid=685
主板=iframe_product.asp?classid=685
显卡=iframe_product.asp?classid=685
CPU=iframe_product.asp?classid=685
内存=iframe_product.asp?classid=685
硬盘=iframe_product.asp?classid=685
CPU风扇=iframe_product.asp?classid=685
光驱=iframe_product.asp?classid=685
音箱=iframe_product.asp?classid=685
机箱+电源=iframe_product.asp?classid=685
键盘鼠标=iframe_product.asp?classid=685
摄像头=iframe_product.asp?classid=685
耳机.麦克风=iframe_product.asp?classid=685
手写板=iframe_product.asp?classid=685
路由器 网卡=iframe_product.asp?classid=685
网线=iframe_product.asp?classid=685
网络配件=iframe_product.asp?classid=685
品牌台式机 电询=iframe_product.asp?classid=685
笔记本 电询=iframe_product.asp?classid=685
监控产品=iframe_product.asp?classid=685
U盘 数码卡=iframe_product.asp?classid=685
小线材=iframe_product.asp?classid=685
插座=iframe_product.asp?classid=685
各类电源适配器=iframe_product.asp?classid=685
各类小件=iframe_product.asp?classid=685
客户 建议区 投诉区=iframe_product.asp?classid=685
日常用品=iframe_product.asp?classid=685
请教一下，这里的循环怎么才能写到配置文件里不是同iframe_product.asp?classid=685一个结果。
content, PUBLIC

相关帖子
回复

举报

Au3代码高亮发贴标签： [AU3] 你的代码 [/AU3]                   支持论坛的发展，请添加此》》网址导航《《为您的主页          
lixiaolong
发表于 2011-1-26 02:18:08 | 显示全部楼层
本帖最后由 lixiaolong 于 2011-1-26 02:30 编辑

回复 1# Netfox 

$data = FileRead(@ScriptDir & "\Sourcedata.tmp")
$title = StringRegExp($data, '<td .+arget="i_product">(.*?)</a></td>', 3)
$url = StringRegExp($data, '<a href="(.+?)"\s[class="i_product"][^>]*>', 3)
For $i = 0 To UBound($title) - 1
        IniWrite("BigClass.db", "BigClass", $title[$i], $url[$i])
Next
;FileDelete(@ScriptDir & "\Sourcedata.tmp")


下面的2个代码加了MsgBox，你实行一下看看什么样的动作

你的代码
$data = FileRead(@ScriptDir & "\Sourcedata.tmp")
$title = StringRegExp($data, '<td .+arget="i_product">(.*?)</a></td>', 3)
$url = StringRegExp($data, '<a href="(.+?)"\s[class="i_product"][^>]*>', 3)
For $i = 0 To UBound($title) - 1
        MsgBox(0,0,$title[$i])
        For $k = 0 To UBound($url) - 1
                MsgBox(0,0,$url[$k])
                IniWrite("BigClass.db", "BigClass", $title[$i], $url[$k])
        Next
Next
修改后的代码
$data = FileRead(@ScriptDir & "\Sourcedata.tmp")
$title = StringRegExp($data, '<td .+arget="i_product">(.*?)</a></td>', 3)
$url = StringRegExp($data, '<a href="(.+?)"\s[class="i_product"][^>]*>', 3)
For $i = 0 To UBound($title) - 1
        MsgBox(0,0,$title[$i])
        MsgBox(0,0,$url[$i])
        IniWrite("BigClass.db", "BigClass", $title[$i], $url[$i])
Next
回复

举报

Netfox
 楼主| 发表于 2011-1-26 12:17:00 | 显示全部楼层
回复 2# lixiaolong
$data = FileRead(@ScriptDir & "\Sourcedata.tmp")
$title = StringRegExp($data, '<td .+arget="i_product">(.*?)</a></td>', 3)
$url = StringRegExp($data, '<a href="(.+?)"\s[class="i_product"][^>]*>', 3)
For $i = 0 To UBound($title) - 1
        MsgBox(0,0,$title[$i])
        MsgBox(0,0,$url[$i])
        IniWrite("BigClass.db", "BigClass", $title[$i], $url[$i])
Next

如果$url[$i]和$Title[$i]数组的维数不一样，就会出错了。
回复

举报

lixiaolong
发表于 2011-1-26 14:04:42 | 显示全部楼层
本帖最后由 lixiaolong 于 2011-1-26 14:06 编辑

回复 3# Netfox

试试这个
$data = FileRead(@ScriptDir & "\Sourcedata.tmp")
$title = StringRegExp($data, '<td .+arget="i_product">(.*?)</a></td>', 3)
$url = StringRegExp($data, '<a href="(.+?)"\s[class="i_product"][^>]*>', 3)
$a = 0
For $i = 0 To UBound($title) - 1
        ;MsgBox(0,0,$title[$i])
        For $k = $a To UBound($url) - 1
                ;MsgBox(0,0,$url[$k])
                IniWrite("BigClass.db", "BigClass", $title[$i], $url[$k])
                $a += 1
                ExitLoop
        Next
Next
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 加入

本版积分规则

QQ|手机版|小黑屋|AUTOIT CN ( 鲁ICP备19019924号-1 )谷歌 百度

GMT+8, 2024-11-15 21:34 , Processed in 0.103851 second(s), 23 queries .

Powered by Discuz! X3.5 Licensed

© 2001-2024 Discuz! Team.

快速回复 返回顶部 返回列表