% SetCounter("ssqzst") %> <% function getNums(str,num) if len(str)=0 then exit function dim i,isum isum=0 for i=1 to len(str) if instr(i,str,num)>0 then isum=isum+1 i=CInt(instr(i,str,num)) end if next getNums=isum end function Dim I,J,MaxQihao,MinQihao MinQihao = Request.Form("select") MaxQihao = Request.Form("select2") If MinQihao = "" Then MinQihao = CLng(ReturnMaxQi()) - 30 End If If MaxQihao = "" Then MaxQihao = CLng(ReturnMaxQi()) End If %>
期号 | 3d试机号 | 3d开奖号 | 类型 | 百位大小走势图 | 十位大小走势图 | 个位大小走势图 | |||||||||||||||||||||||||||||
百 | 十 | 个 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |||
" & ListQihaoArr(I) & " | " Response.Write "" & TestNumberArr(I) & " | " Response.Write "" & FirstNumArr(I) & " | " Response.Write "" & SecondNumArr(I) & " | " Response.Write "" & ThirdNumArr(I) & " | " Response.Write "" & JQNumberArr(I) & " | " For A = 1 to 3 for B = 0 to 9 if Cint(mid(NumLink(I),A,1)) = B then if B <= 4 then Response.Write "" & B & " | " else Response.Write "" & B & " | " end if else if B <= 4 then Response.Write "" else Response.Write " | " end if end if next Next next %> | ||||||||||||||||||||||||||
预 选 号→ | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |||||
预 选 号→ | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |||||
预 选 号→ | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | |||||
期号 | 3d试机号 | 百 | 十 | 个 | 类型 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 0 | 1 | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 |
3d开奖号 | 百位大小走势图 | 十位大小走势图 | 个位大小走势图 |