권장 : ASP 통화 대문자 변환 기능 함수 ATOC (A는 통화로) 문자열로서 '설명 :이 기능은 1 조 미만의 유안의 통화 변환에 적합합니다. A의 값은 최대 두 자리 자리에서 두 개의 문자열을 정의 할 수 있습니다. 여기서 한자와 숫자는 한 곳에서 계산됩니다. dim string1은 문자열 '정의로 Dim String2를 다음과 같이 string'정의로 다음과 같이 Dim String3을 문자열로 string '으로 정의합니다.
<% setrecordset1 = server.createObject (adodb.recordset) exec = select*fromnewswhereid = & id RecordSet1.openexec, Conn, 1,1 %> <tableWidth = 85%테두리 = 0Align = CENTRICELPADDING = 3CELLSPACING = 0> <tr> <td> ......... <% ifrequest (페이지) = 그런 다음 pagenum = 0 또 다른 pagenum = 요청 (페이지) endif contenttr = split (레코드 세트 1 (세부 사항), ||) fori = pagenumtopagenum %> <%= contentstr (i)%> <%next%> </td> </tr> <%ifubund (contentstr)> = 1then%> <tr> <tdheight = 30>이 기사는 다음으로 나뉩니다 <% forp = 0toubund (contentstr) IFP+1 = 요청 (페이지)+1then a = <fontcolor = red> aa = </font> 또 다른 a = aa = endif %> <ahref = detail.asp? id = <%= request (id)%> & page = <%= p%>> <%= a%> <%= p+1%> <%= aa%> </a> <%next%> 페이지 </td> </tr> <%endif%> |
기사를 추가 할 때 스플리터를 추가하십시오 || 페이징을 원하는 곳.
공유 : 중국어로만 입력 할 수있는 방법을 제한하는 방법. 기능 ISCHARSINBAG (S, Bag) {var I, C; for (i = 0; i s.length; i ++) {c = s.charat (i); // 문자열의 문자 if (bag.indexof (c) -1) return c; } 반품 ; } 함수 확인 : 함수 ischinese (s) {var errorchar; var badchar = abcdefghijklmnopqrst