複製** **如下:
function splitx(strs1 as string, strs2 as程式設計客棧 string, n as integer)
'自定義分段函式 splitx([字串],"分隔符",第n段)
dim groupst() as string
groupst = split(strs1, strs2)
if ubound(groupst) < n - 1 then
splitx = 0
else
splitx = groupst(n - 1)
end if
end function
'/-------------------------------------
function minx(ksmc as string, lb as string, kmi as string, n as string)
'第n名的成績 minx([考試名稱],[類別],[科目],n)
dim con as object
dim rs as object
dim stsql as string
dim kmf as string
kmf = mid(kmi, 1, 1) &www.cppcns.com "組"
set con = application.currentproject.connection
set rs = createobject("adodb.recordset")
strsql = "select top 1 " & kmi & " as 達標分 from 成績總表 "
strsql = strsql + " where ((( " & kmf & " ) <= " & n & ") and ((類別) = '" & lb & "' and 考試名稱='"www.cppcns.com & ksmc & "'))"
strsql = strsql + " order by " & kmi
rs.open strsql, con, 3, 3
if rs.eof then
minx = 0
else
minx = rs("達標分")
end if
rs.close
set rs = nothing
set con = nothing
end function
本文標題: asp 自定義分段函式/求第n名成績
本文位址: /wangluo/asp/52598.html
ASP自定義函式集
for dig 1 to len utfstr 如果utf8編碼文字以 開頭則進行轉換 if mid utfstr,dig,1 then utf8編碼文字大於8則轉換為漢字 if len utfstr dig 8 then gbstr gbstr convchinese mid utfstr,dig...
Matlab利用自定義函式實現分段函式積分
這裡演示怎麼使用matlab定義函式然後實現積分 測試函式 exp x x 0 exp x x 0 首先利用matlab的函式計算 tic integral x exp x x 0 exp x x 0 5,5 toctic integral x exp x 0,5 integral x exp x ...
第7章 自定義函式
demo1.php 標準函式,內建函式 echo md5 123456 echo echo sha1 123456 echo 閱誰問君誦,水落清香浮。demo2.php 建立函式,不要跟系統的內建函式重名 函式有個特性,必須呼叫,才可以執行 無引數表示 裡面是空的,無返回就是函式的程式裡沒有 ret...