無效的過程呼叫或引數 mid urgent！ ASP大師，請進入20

tmpstr=mid(tmpbody,bstr+len(str1),estr-bstr-len(str1))

引數使用一定有問題，建議檢視最後兩個值是否越界，最後乙個值是否為負數。 在它之前插入兩個語句。

bstr+len(str1)

estr-bstr-len(str1)

注釋掉中間的句子，除錯，你一定會的。 檢查並檢查以了解錯誤是什麼。

問題應該出在：tmpstr=mid（tmpbody，bstr+len（str1），estr-bstr-len（str1））。

bstr+len（str1） 的值不為 0，或者 estr-bstr-len（str1） 的值大於 tmpbody 的總字元長度。

你在這句話之前新增乙個判斷，如果 （bstr+len（str1））>0 和 （estr-bstr-len（str1））<=len（tmpbody） 那麼

角色錯了！ "

end if

divider=leftb(imgdata,clng(instrb(imgdata,hcrlf))-1)

當 imgdata 不包含 HCRLF 時，會出現 divider=leftb（imgdata， -1），並出現錯誤。

判斷語句應放在它前面，如果它不包含 HCRLF，它會提示並退出。

要麼你的笑標尺引數為 null，要麼你的第二個和第三個引數為負數。

口碑公升天的具體情況，還是要分慶分析來判斷的。

但是，這個問題很容易解決。

當不包含 act typepath 變數時"/"，mid 函式的第三個引數等於 -1，並且會出現錯誤“無效的過程呼叫或引數”。

將其更改為如下所示（typedata，我沒有看到特定的**）如果 s<1 則 s=0

for ii=maxperpage*(page-1) to stemptext=temptext&""

temp=""&typedata(7,ii)&"

"&typedata(2,ii)&""&left(typedata(6,ii),30)&""

"end if

next

不要使用 Table，請使用 div+css。

for...

subject

next %>

css。

這是因為您的一條記錄的 rs（"content"） 在 無"[/img]"，所有 instr（pic dy，"[/img]"結果是 0，再減去 1 到 -1，left 函式中的 length 引數不能為負數，所以如果有誤差，可以判斷 instr（pic dy，"[/img]"） 大於 0，然後進行相應的處理。

作業還是要自己寫的，程式寫得越多，你就越熟練，不能投機取巧，那對自己來說就是乙個錯誤。

你什麼時候想要它？

100分幫忙做哈哈。

不如請房東好好學習，自己做功課，祖國的棟樑，呵呵。

這是 ASP 原始碼，你把它放在你的頁面中，然後輸出 Datestr 你需要輸出文字。

936 '設定輸出編碼。

gb2312" '設定編碼格式。

dim typestr,datestr : typestr = request("type"） 定義乙個變數來獲取型別值，並輸出文字字串變數 datestr

- 方法一，使用 if 語句。

if typestr = today"thendatestr = 今天"

elseif typestr = nextday"thendatestr = 明天"

elseif typestr = week"thendatestr = 本週"

elseif typestr = month"thendatestr = 這個月"

elseif typestr = year"thendatestr = 今年"

elsedatestr = 未獲取 time 引數或引數無效"

end if

- 方法二：使用select case語句。

select case typestr

case "today":d atestr = 今天"

case "nextday"： datestr = 明天"

case "week":d atestr = 本週"

case "month":d atestr = 本月"

case"year":d atestr = 今年"

case else ： datestr = 未獲得時間引數或引數無效"

end select

輸出變數，使用要使用 datestr 的位置

= 936 '設定輸出編碼。

gb2312" '設定編碼格式。

dim typestr,datestr : typestr = request("type"） 定義乙個變數來獲取型別值，並輸出文字字串變數 datestr

if typestr = today"thendatestr = 今天"

elseif typestr = nextday"thendatestr = 明天"

elseif typestr = week"thendatestr = 本週"

elseif typestr = month"thendatestr = 這個月"

elseif typestr = year"thendatestr = 今年"

elsedatestr = 未獲取 time 引數或引數無效"

end if

輸出變數。

在頁面中，首先獲取接收型別的值，然後將此值與 toda 組合

次日、周、月、年對比，哪乙個符合對應日期的產出，不知道是否符合你的要求。

我不明白你不使用資料庫是什麼意思。

dim strsource,strdest,strtemp,i,j

strsource="012346|0123789|0123456789"

strtemp=split(strsource,"|")

strdest=""

for i=0 to ubound(strtemp)

for j=1 to len(strtemp(i))

strdest=strdest & mid(strtemp(i),j,1) &","

nextstrdest=left(strdest,len(strdest)-1) &"|" '避免在每個部分的末尾使用“'”號。

nextstrdest=left(strdest,len(strdest)-1)'根據房東給出的格式，刪除最終結果的最後乙個"|".

strdest

我不是最好的，但肯定是最容易理解的。