AutoHotkey中文社区
文章
评论
关注
粉丝
私信列表所有往来私信
财富管理余额、积分管理
推广中心推广有奖励
任务中心每日任务
成为会员购买付费会员
认证服务申请认证
小黑屋关进小黑屋的人
我的订单查看我的订单
我的设置编辑个人资料
进入后台管理
概览
发布的
订单
邀请码
收藏
设置
脚本失效，原链接看了一下作者不更新了，我改了一下 ;作者:sunwind ;时间:2019年8月22日17:51:29 ;功能:获取股票、期货价格 ;最新版本:https://blog.csdn.net/liuyukuan/article/details/100019615 ;~ code:="sh600066" ;好用 ;~ code:="000012" ;好用 code:="002031" ;好用 ;~ code:="M0" ;好用 ;~ code:="SR2001" ;好用 ;~ URL=http://hq.sinajs.cn/list=M0 ;~ code:="SR2001" ;~ code:="000012" arr:=获取行情信息(code) 股价:=arr[4] 股票名称:=arr[1] TrayTip , % arr[1], % "当前价格:" arr[4] return ;股票标准入参格式： ;sh600066 sh上海 sz深圳 ;股票非标入参格式： ;或者600050 ;或者7600050 ;会被统一转换为sh600066 ;期货标准入参格式： ;SR2001 获取行情信息(_str:="sh600050") { if(StrLen(_str)>=6) { ;形如 600050 或 SR2001 StringRight,stockCode,_str,6 StringLeft,flag,stockCode,2 if (flag=60){ pre:="sh" }else if (flag=00 or flag=30){ pre:="sz" }else{ pre:="" } stockCode:=pre . stockCode }else{ ;形如 "M0" stockCode:=_str } WebRequest := ComObjCreate("WinHttp.WinHttpRequest.5.1") n:=13 start:=10**(n-1) end:=(10**n)-1 Random, rand, start, end ;~ URL=http://hq.sinajs.cn/rn=%rand%&list=%stockCode% ;~ var hq_str_sh600066="宇通客车,15.050,14.980,15.600,15.920,14.920,15.590,15.600,51871998,802070840.000,18800,15.590,66900,15.580,129500,15.570,209400,15.560,13400,15.550,7456,15.600,73100,15.610,62400,15.620,38000,15.630,4300,15.640,2019-04-17,15:00:03,00"; ;1.今日开盘价 ;2.昨日收盘价 ;3.当前价格 ;4.今日最高价 ;5.今日最低价 ;6.买一 ;7.卖一 URL=http://hq.sinajs.cn/rn=%rand%&list=%stockCode% WebRequest.Open("GET", URL) WebRequest.setRequestHeader("Referer", "https://finance.sina.com.cn") WebRequest.Send() WebRequest.WaitForResponse() response := WebRequest.ResponseText StringReplace,response,response,var hq_str_,`" if InStr(response,"Failed") MsgBox "Failed" arr:=StrSplit(response,",") Return arr }
random给您打赏了￥20
random给您打赏了￥5
random给您打赏了￥2
建议做一个平台，互相提升
?
random给您打赏了￥10
解锁会员权限
开通会员
解锁海量优质VIP资源
立刻开通
今日签到
连续签到
之前
未认证
脚本失效，原链接看了一下作者不更新了，我改了一下 ;作者:sunwind ;时间:2019年8月22日17:51:29 ;功能:获取股票、期货价格 ;最新版本:https://blog.csdn.net/liuyukuan/article/details/100019615 ;~ code:="sh600066" ;好用 ;~ code:="000012" ;好用 code:="002031" ;好用 ;~ code:="M0" ;好用 ;~ code:="SR2001" ;好用 ;~ URL=http://hq.sinajs.cn/list=M0 ;~ code:="SR2001" ;~ code:="000012" arr:=获取行情信息(code) 股价:=arr[4] 股票名称:=arr[1] TrayTip , % arr[1], % "当前价格:" arr[4] return ;股票标准入参格式： ;sh600066 sh上海 sz深圳 ;股票非标入参格式： ;或者600050 ;或者7600050 ;会被统一转换为sh600066 ;期货标准入参格式： ;SR2001 获取行情信息(_str:="sh600050") { if(StrLen(_str)>=6) { ;形如 600050 或 SR2001 StringRight,stockCode,_str,6 StringLeft,flag,stockCode,2 if (flag=60){ pre:="sh" }else if (flag=00 or flag=30){ pre:="sz" }else{ pre:="" } stockCode:=pre . stockCode }else{ ;形如 "M0" stockCode:=_str } WebRequest := ComObjCreate("WinHttp.WinHttpRequest.5.1") n:=13 start:=10**(n-1) end:=(10**n)-1 Random, rand, start, end ;~ URL=http://hq.sinajs.cn/rn=%rand%&list=%stockCode% ;~ var hq_str_sh600066="宇通客车,15.050,14.980,15.600,15.920,14.920,15.590,15.600,51871998,802070840.000,18800,15.590,66900,15.580,129500,15.570,209400,15.560,13400,15.550,7456,15.600,73100,15.610,62400,15.620,38000,15.630,4300,15.640,2019-04-17,15:00:03,00"; ;1.今日开盘价 ;2.昨日收盘价 ;3.当前价格 ;4.今日最高价 ;5.今日最低价 ;6.买一 ;7.卖一 URL=http://hq.sinajs.cn/rn=%rand%&list=%stockCode% WebRequest.Open("GET", URL) WebRequest.setRequestHeader("Referer", "https://finance.sina.com.cn") WebRequest.Send() WebRequest.WaitForResponse() response := WebRequest.ResponseText StringReplace,response,response,var hq_str_,`" if InStr(response,"Failed") MsgBox "Failed" arr:=StrSplit(response,",") Return arr }
random给您打赏了￥20
random给您打赏了￥5
random给您打赏了￥2
random给您打赏了￥5
random给您打赏了￥5
建议做一个平台，互相提升
?
random给您打赏了￥5
random给您打赏了￥10