TC官方合作论坛

标题: 发一个人工代答题源码！每题7题多吧！ [打印本页]
作者: jdda    时间: 2013-6-7 12:07
标题: 发一个人工代答题源码！每题7题多吧！
用的是简单答题插件.官网是 www.jdda.net 自己上官网下载插件，目前官网上没有tc源码例子。我写一下
  1. 功能 简单答()
  2.     Jdda=com("FAQQuestion.FAQObject")
  3.     i=0
  4. dd:

  6.         TID = Jdda.SendFile("上传密码串-登录后显示在网站上部","1001","c:\\screen.bmp" , "300")   
  7.         
  8. n:
  9.          var Answer = "-7"        
  10.         如果(Answer == "-7")            
  11.             i=i+1
  12.             Answer = Jdda.ReceiveAnswer(TID)
  13.             辅助.等待(1000)
  14.         否则
  15.             
  16.             goto m
  17.             
  18.         如果结束
  19.         
  20.         
  21.         if(i>48)
  22.             
  23.             goto nn
  24.             
  25.             
  26.         endif
  27.         goto n
  28.         
  29. m:
  30.         
  31.         辅助.消息框(Answer)
  32.         如果(Answer >0)
  33.             
  34.             辅助.消息框(Answer)
  35.         否则
  36.             goto n
  37.             
  38.         如果结束
  39.         
  40.         
  41.     如果结束
  42.    
  43. nn:
  44.    
  45. 功能结束
复制代码
作者: jdda    时间: 2013-6-7 12:08
占个位子，有不懂的在这里更新



欢迎光临 TC官方合作论坛 (http://bbs.52tc.co/) Powered by Discuz! X3.1