ASP VBScript服務器端編程

-2

我是VBScript編程新手。並且剛開始使用ASP進行編程。問題是我有60個選項作爲按鈕，必須相應地顯示頁面。以前我們有60個功能相同的功能。現在我想用select語句將它轉換爲單個函數。所以我將不同的數字作爲參數傳遞給函數以獲取要顯示的頁面。但是當我檢查參數值時，我得到溢出。是否因爲類型轉換錯誤？我有2個hierachies。所以我通過2位數字如11。使用11/10作爲第一和11模10作爲第二級選擇器我有一些圖像和Onclicking的代碼是以下。ASP VBScript服務器端編程

<html> 
<head> 
<script> 
function CallFun(a) 
select case int(a/10) 
case 1 
do something 
end select 
end Function 
</script></head><body><img src="Source.gif" onclick = CallFun(11)></body>

來源

2012-12-19 user1914661

需要一些代碼有什麼想法，有什麼地方錯了... –

剛添加的代碼 – user1914661

的HTML頁面是這樣的（使用VBScript）僅將在Internet Explorer上運行。另外，請嘗試[附加調試器]（https://www.google.co.il/search?num=100&hl=zh-CN&client=firefox-a&hs=2QZ&tbo=d&rls=org.mozilla%3Aen-US%3Aofficial&q=attach+debugger +到+ ASP +經典和OQ =附加+調試器+到+ ASP +經典與gs_l = serp.12 ... 0.0.0.23484.0.0.0.0.0.0.0.0..0.0.les％3B..0.0 ... 1c.R9TTM_KujjA ）看看代碼中發生了什麼。 –

像這樣的東西應該工作：

function test(param) 
    dim lvl1 : lvl1 = param\10 
    dim lvl2 : lvl2 = param MOD 10 
    Select Case lvl1 
     Case 1 
      if lvl2 = 1 then 
       'some code 
      end if 
     Case 2 
      ' some code 
     Case 3 
      ' some code 
     Case Else 
      ' some code 
    End Select 
End function 

Call test(23)  'for example

來源

2012-12-19 11:20:10

param \ 10是一個整數除法，如果輸入是23，param/10會給你2.3，參數\ 10會給你2，這就是你想要的。 –

ASP VBScript服務器端編程

回答

相關問題