程序師世界是廣大編程愛好者互助、分享、學習的平台,程序師世界有你更精彩!
首頁
編程語言
C語言|JAVA編程
Python編程
網頁編程
ASP編程|PHP編程
JSP編程
數據庫知識
MYSQL數據庫|SqlServer數據庫
Oracle數據庫|DB2數據庫
 程式師世界 >> 編程語言 >> 網頁編程 >> ASP編程 >> ASP技巧 >> Asp及Web開發中的常見問題總結(2)

Asp及Web開發中的常見問題總結(2)

編輯:ASP技巧

error # 58 文件已存在

  error # 61 磁盤已滿

  error # 62 輸入超出了文件尾

  error # 67 文件過多

  error # 68 設備不可用

  error # 70 沒有權限

  error # 71 磁盤沒有准備好

  error # 74 重命名時不能帶有其他驅動器符號

  error # 75 路徑/文件訪問錯誤

  error # 76 路徑未找到

  error # 91 對象變量未設置

  error # 92 For 循環未初始化

  error # 94 無效使用 Null

  error # 322 不能創建必要的臨時文件

  error # 424 缺少對象

  error # 429 ActiveX 部件不能創建對象

  error # 430 類不支持 Automation 操作

  error # 432 Automation 操作中文件名或類名未找到

  error # 438 對象不支持此屬性或方法

  error # 440 Automation 操作錯誤

  error # 445 對象不支持此操作

  error # 446 對象不支持已命名參數

  error # 447 對象不支持當前區域設置選項

  error # 448 未找到已命名參數

  error # 449 參數是必選項

  error # 450 錯誤的參數個數或無效的參數屬性值

  error # 451 對象不是一個集合

  error # 453 未找到指定的 DLL 函數

  error # 455 代碼資源鎖定錯誤

  error # 457 此鍵已與該集合的一個元素關聯

  error # 458 變量使用了一個 VBScript 中不支持的 Automation 類型

  error # 462 遠程服務器不存在或不可用

  error # 481 無效圖片

  error # 500 變量未定義

  error # 501 非法賦值

  error # 502 對象不能安全用 Script 編程

  error # 503 對象不能安全初始化

  error # 504 對象不能安全創建

  error # 505 無效的或無資格的引用

  error # 506 類沒有被定義

  error # 507 出現一個意外錯誤

  error # 1001 內存不夠

  error # 1002 語法錯誤

  error # 1003 缺少 ':'

  error # 1005 缺少 '('

  error # 1006 缺少 ')'

  error # 1007 缺少 ']'

  error # 1010 缺少標識符

  error # 1011 缺少 '='

  error # 1012 缺少 'If'

  error # 1013 缺少 'To'

  error # 1014 缺少 'End'

  error # 1015 缺少 'Function'

  error # 1016 缺少 'Sub'

  error # 1017 缺少 'Then'

  error # 1018 缺少 'Wend'

  error # 1019 缺少 'Loop'

  error # 1020 缺少 'Next'

  error # 1021 缺少 'Case'

  error # 1022 缺少 'Select'

  error # 1023 缺少表達式

  error # 1024 缺少語句

  error # 1025 語句未結束

  error # 1026 缺少整型常數

  error # 1027 缺少 'While' 或 'Until'

  error # 1028 缺少 'While' 和 'Until'或語句未結束

  error # 1029 缺少 'With'

  error # 1030 標識符過長

  error # 1031 無效數字

  error # 1032 無效字符

  error # 1033 未結束的字符串常量

  error # 1034 注釋未結束

  error # 1037 無效使用 'Me' 關鍵字

  error # 1038 'loop' 語句缺少 'do'

  error # 1039 無效的 'exit' 語句

  error # 1040 循環控制變量 'for' 無效

  error # 1041 名稱重定義

  error # 1042 必須是行中的第一個語句

  error # 1043 不能為 non-ByVal 參數賦值

  error # 1044 調用子程序時不能使用括號

  error # 1045 缺少文字常數

  error # 1046 缺少 'In'

  error # 1047 缺少 'Class'

  error # 1048 必須在一個類的內部定義

  error # 1049 在屬性聲明中缺少 Let , Set 或 Get

  error # 1050 缺少 'Property'

  error # 1051 在所有屬性的規范中,變量的數目必須一致

  error # 1052 在一個類中不允許有多個缺省的屬性/方法

  error # 1053 類的初始化或終止程序沒有變量

  error # 1054 屬性的 set 或 let 必須至少有一個變量

  error # 1055 錯誤的 'Next'

  error # 1056 'Default' 只能在 'Property' , 'Function' 或 'Sub' 中指定

  error # 1057 指定 'Default' 時必須同時指定 'Public'

  error # 1058 只能在 Property Get 中指定 'Default'

  error # 4096 Microsoft VBScript 編譯器錯誤

  error # 4097 Microsoft VBScript 運行時錯誤

  error # 5016 缺少正則表達式對象

  error # 5017 正則表達式語法錯誤

  error # 5018 錯誤的數量詞

  error # 5019 正則表達式中缺少 ']'

  error # 5020 正則表達式中缺少 ')'

  error # 5021 字符集越界

  樹形菜單:

  <SCRIPT language="JavaScript">

  var lastObj

  function expandIt(obj)

  {

  if(lastObj != null)

  {

  if(obj == lastObj)

  {

  if(obj.style.display == "none")

  {

  obj.style.display = "";

  }

  else

  {

  obj.style.display = "none"

  }

  }

  else

  {

  lastObj.style.display = "none";

  obj.style.display = "";

  }

  }

  else

  {

  obj.style.display = "";

  }

  lastObj = obj

  }

  </SCRIPT>

  <table width="100%" border="0" cellspacing="0" cellpadding="0">

  <%

  dim id

  id = request("id")

  dim strsql,rs

  strsql="select * from p_type where slanguage=1 and typelevel=1 order by typename"

  set rs=fgetrslist(strsql)

  do while not rs.eof

  %>

  <tr>

  <td height="25" class="LEFTLINKS"><img width="30" height="0" align="absmiddle" /><b><%if rs("isleaf")=0 then%><a href="#" onClick="Javascript:expandIt(kb<%=rs("id")%>);return false"><%else%><a href="<%=request.ServerVariables("SCRIPT_NAME")%>?idtree=<%=rs("idtree")%>" ><%end if%><%=server.HtmlEncode(right((rs("typename")&""),len(rs("typename")&"")-2))%></a></b></td>

  </tr>

  <%

  IF clng(id)=clng(rs("id")) then

  %>

  <tr id="kb<%=rs("id")%>">

  <%

  else

  %>

  

  <tr id="kb<%=rs("id")%>" >

  <%

  end if

  %>

  <td>

  <table>

  <%

  dim rs1

  strsql="select * from p_type where parentid="&rs("id")&" and slanguage=1 order by typename"

  set rs1=fgetrslist(strsql)

  do while not rs1.eof

  %>

  <tr><td height="20" class="LEFTLINKS">

  <img width="40" height="0" align="absmiddle" /><a href="<%=request.ServerVariables("SCRIPT_NAME")%>?idtree=<%=rs1("idtree")%>&id=<%=rs("id")%>" ><%=server.HtmlEncode(right((rs1("typename")&""),len(rs1("typename")&"")-2))%></a></td></tr>

  <%

  rs1.movenext

  loop

  rs1.close

  set rs1=nothing

  %>

  </table>

  </td>

  </tr>

  <%

  rs.movenext

  loop

  rs.close

  set rs=nothing

  %>

  </table>

  1. 上一頁:
  2. 下一頁:
Copyright © 程式師世界 All Rights Reserved