asp編程經驗談:Asp及Web開發中的常見問題

來源:互聯網
上載者:User

標籤:style   http   io   color   ar   os   使用   sp   java   

  表格的折行處理.

  <table style="TABLE-LAYOUT: fixed" width="200" border="0" cellspacing="0" cellpadding="7" bgcolor="#f7f7f7">

  <tr>

  <td style="LEFT: 0px; WIDTH: 100%; WORD-WRAP: break-word">上海男子醫院</td>

  </tr>

  </table>

  此處主要是用css樣式進行控制在<table>標籤中有個style="TABLE-LAYOUT: fixed",其說明如下

  文法:

  table-layout : auto | fixed

  參數:

  auto :  預設的自動演算法。布局將基於各儲存格的內容。表格在每一儲存格讀取計算之後才會顯示出來。速度很慢

  fixed :  固定式配置的演算法。在這演算法中,水平布局是僅僅基於表格的寬度,表格邊框的寬度,儲存格間距,列的寬度,而和表格內容無關,此時在<td>標籤中如果沒有WORD-WRAP: break-word樣式,表格中的內容將只能顯示一部份,具體看錶格的寬度了.word-wrap說明如下:

  文法:

  word-wrap : normal | break-word

  參數:

  normal :  允許內容頂開指定的容器邊界

  break-word :  內容將在邊界內換行。如果需要,詞內換行(word-break)也會發生

  VBSCRIPT標記索引

  基本運算

  + 數字加法及字串串連

  - 數字減法

  * 數字乘法

  / 數字除法

  Mod 求餘數

  \ 求商數

  & 字串串連

  ^ 次方

  = 相等

  <> 不相等

  >= 大於或等於

  > 大於

  <= 小於或等於

  < 小於

  Not 非

  And 且

  Or 或

  Xor 異或

  迴圈及決策

  if ....then 若...則...

  if ...then...else 若...則...非

  else if... 非若

  select case... 群組選擇條件

  end select

  for ... next 計數迴圈

  while...wend 條件迴圈(一)

  do while...loop 條件迴圈(二)

  do...loop while 條件迴圈(三)

  do until...loop 條件迴圈(四)

  do...loop until 條件迴圈(五)

  數學函數

  Abs 絕對值

  Sgn 加號或減號

  Hex 轉換成十六進位

  Oct 轉換成八進位

  Sqr 平方根

  Int 取整數

  Fix 取整數

  Round 取整數

  Log 以e為底的對數

  Sin 正弦函數

  Cos 餘弦函數

  Tan 正切函數

  字串處理函數

  Len 字串長度

  Mid 取部分字串

  Left 從字串開頭取部分字串

  Right 從字串結尾取部分字串

  Lcase 轉換成小寫

  Ucase 轉換成大寫

  Trim 清除字串開頭及結尾的空格符

  Ltrim 清除字串開頭空格符

  Rtrim 清除字串結尾空格符

  Replace 替換字串部分字元

  Instr 判斷是否包含於另一個字串(從起始搜尋)

  InstrRev 判斷是否包含於另一個字串(從結尾搜尋)

  Space 任一字元數的空格符

  String 任一字元數的任一字元

  StrReverse 反轉字串

  Split 以某字元分割字串

  資料類型轉換函式

  Cint 轉換成整形

  Cstr 轉換成字串

  Clng 轉換成常整數

  Cbool 轉換成布爾函數

  Cdate 轉換成日期函數

  CSng 轉換成單精確度

  CDbl 轉換成雙精確度

  日期時間函數

  Date 現在日期

  Time 現在時間

  NOw 現在日期時間

  DateAdd 增加日期

  DateDiff 兩日期差

  DateSerial 日期設定

  DateValue 日期設定

  Year 現在年份

  Month 現在月份

  Day 現在天

  Hour 現在時刻

  Minute 現在分鐘

  Second 現在秒鐘

  Timer 午夜距現在秒數

  TimeSerial 時間設定

  TimeValue 時間所屬部分

  WeekDay 星期名稱

  MonthName 月份名稱

  其它函數

  Array 產生數組

  Asc 字元ASCII碼

  Chr ASCII碼字元

  Filter 過濾數組

  InputBox 輸入視窗

  Join 合并數組中的元素

  MsgBox 資訊視窗

  Lbound 數組下界

  Ubound 數組上界

  指令

  Const 設定常數

  Dim 定義變數或者數組

  Erase 清除數組

  ReDim 重新聲明數組

  Randomize 起始隨機數

  Rnd 取得隨機數

  ASP對象

  Session對象

  IsEmpty 測試Session變數是否存在

  TimeOut 設定Session變數生存周期

  Abandon 強制清除Session變數

  Application對象

  IsEmpty 測試Application變數是否存在

  Lock 鎖定Application變數

  Unlock 解除Lock指令的鎖定

  Cookies對象

  Expires 設定Cookies變數的生存周期

  Connection對象

  Open 開啟與資料庫的串連

  Execute 開啟Recordset對象

  Close 關閉Connection對象

  Recordset對象

  movefirst 將記錄指標移至第一條

  movelast 將記錄指標移至最後一條

  movenext 將記錄指標移至下一條

  moveprevious 將記錄指標移至上一條

  bof 測試是否為recordset的起始

  eof 測試是否為recordset的結束

  open 開啟Recoreset對象

  close 關閉recordset對象

  fields 讀取資料的子物件

  fileds.count 欄位個數

  pagesize 每頁記錄條數

  absolutepage 設定為某頁

  pagecount 總頁數

  Absoluteposition 直接跳至某條記錄

  MicrosoftVBscript執行階段錯誤列表(10進位表示)

  error # 5 無效的程序呼叫或參數

  error # 5 無效的程序呼叫或參數

  error # 6 溢出

  error # 7 記憶體不夠

  error # 9 下標越界

  error # 10 該數組為定長的或臨時被鎖定

  error # 11 被零除

  error # 13 類型不符

  error # 14 字串空間不夠

  error # 17 不能執行所需的操作

  error # 28 堆疊溢位

  error # 35 未定義過程或函數

  error # 48 載入 DLL 時出錯

  error # 51 內部錯誤

  error # 52 錯誤的檔案名稱或號碼

  error # 53 檔案未找到

  error # 54 錯誤的檔案模式

  error # 55 檔案已經開啟

  error # 57 裝置 I/O 錯誤

  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 缺少Regex對象

  error # 5017 Regex語法錯誤

  error # 5018 錯誤的數量詞

  error # 5019 Regex中缺少 ‘]‘

  error # 5020 Regex中缺少 ‘)‘

  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">

  </tr>

  <%

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

  %>

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

  <%

  else

  %>

  <tr id="kb<%=rs("id")%>" style="display:none;">

  <%

  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">

  

  <%

  rs1.movenext

  loop

  rs1.close

  set rs1=nothing

  %>

  </table>

  </td>

  </tr>

  <%

  rs.movenext

  loop

  rs.close

  set rs=nothing

  %>

  </table>

asp編程經驗談:Asp及Web開發中的常見問題

聯繫我們

該頁面正文內容均來源於網絡整理,並不代表阿里雲官方的觀點,該頁面所提到的產品和服務也與阿里云無關,如果該頁面內容對您造成了困擾,歡迎寫郵件給我們,收到郵件我們將在5個工作日內處理。

如果您發現本社區中有涉嫌抄襲的內容,歡迎發送郵件至: info-contact@alibabacloud.com 進行舉報並提供相關證據,工作人員會在 5 個工作天內聯絡您,一經查實,本站將立刻刪除涉嫌侵權內容。

A Free Trial That Lets You Build Big!

Start building with 50+ products and up to 12 months usage for Elastic Compute Service

  • Sales Support

    1 on 1 presale consultation

  • After-Sales Support

    24/7 Technical Support 6 Free Tickets per Quarter Faster Response

  • Alibaba Cloud offers highly flexible support services tailored to meet your exact needs.