aspÁ¬sqlserver²âÊÔ´úÂë
<%
Dim Conn, Connstr
Dim strServer, strUid, strPwd, strDB
strServer = "HUA-5780C2D1CCF" 'SQLÊý¾Ý¿â·þÎñÆ÷µØÖ·
strUid = "sa" 'Êý¾Ý¿âÓû§Ãû
strPwd = "123456" 'Êý¾Ý¿âÃÜÂë
strDB = "hima" 'Êý¾Ý¿âÃû
'On Error Resume Next
Set Conn = Server.CreateObject("ADODB.Connection")
Connstr = "driver={sql server};server="&strServer&";uid="&strUid&";pwd="&strPwd&";database="&strDB
Conn.Open Connstr
If Err Then
err.Clear
Set Conn = Nothing
Response.Write "<div id=""DBError"">Êý¾Ý¿â·þÎñÆ÷¶ËÁ¬½Ó´íÎó£¬ÇëÓëÍøÕ¾¹ÜÀíÔ±ÁªÏµ¡£</div>"
Response.End
else
Response.Write"Á´½Ó³É¹¦"
End If
%>
Ïà¹ØÎĵµ£º
HOLDLOCK ½«¹²ÏíËø±£Áôµ½ÊÂÎñÍê³É£¬¶ø²»ÊÇÔÚÏàÓ¦µÄ±í¡¢ÐлòÊý¾ÝÒ³²»ÔÙÐèҪʱ¾ÍÁ¢¼´ÊÍ·ÅËø¡£HOLDLOCK µÈͬÓÚ SERIALIZABLE¡£
NOLOCK ²»Òª·¢³ö¹²ÏíËø£¬²¢ÇÒ²»ÒªÌṩÅÅËüËø¡£µ±´ËÑ¡ÏîÉúЧʱ£¬¿ÉÄÜ»á¶ÁȡδÌá½»µÄÊÂÎñ»òÒ»×éÔÚ¶ÁÈ¡ÖÐ¼ä»Ø¹öµÄÒ³Ãæ¡£ÓпÉÄÜ·¢ÉúÔà¶Á¡£½öÓ¦ÓÃÓÚ SELECT Óï¾ä¡£
PAGLOCK ÔÚͨ³£Ê¹Óõ¥¸ö±íËøµ ......
Asp´úÂ룺
<%
set obj=server.CreateObject("wsImage.Resize")
obj.LoadSoucePic server.mappath("25.jpg")
obj.LoadImgMarkPic server.mappath("blend.bmp")
obj.Quality=75
obj.AddImgMark server.mappath("imgMark.jpg"), 315, 220,&hFFFFFF, 70
strError=obj.errorinfo
if strError<>"" then
......
·þÎñÆ÷¶Ë×é¼þ
Ê×ÏÈ,·þÎñÆ÷¶ËµÄ×é¼þÒªÓбðÓÚ¿Í»§¶ËµÄ×é¼þ.¿Í»§¶ËµÄ×é¼þÊÇͨ¹ýÍøÂç´«Êä,ÒÀ*HTMLÀ´Æð×÷ÓÃ.¶øÇÒÖ»ÄÜÔÚIEÉÏÓÐÓÃ.µ«ÊÇ·þ ÎñÆ÷¶ËµÄ×é¼þÊÇÔËÐÐÔÚ·þÎñÆ÷¶Ë,ËüÔÚ·þÎñÆ÷ÉÏÖ´Ðи÷ÖÖ²Ù×÷.Òò´Ë,ËùÓеÄä¯ÀÀÆ÷¶¼ÄÜÏíÓÃ,ËüÒÀ*µÄÊÇ·þÎñÆ÷¶ø²»ÊÇä¯ÀÀÆ÷.
µ±IIS±»ÇëÇóÖ´ÐÐÒ»¸öASP³ÌÐò,ËüÊ×ÏÈ»áÔÚASPÎļþÖÐÕÒµ½¡´%%>±êǩ֮¼ä ......
Asp Split
ÃèÊö£º
·µ»Ø»ùÓÚ 0 µÄһάÊý×飬ÆäÖаüº¬Ö¸¶¨ÊýÄ¿µÄ×Ó×Ö·û´®¡£
Óï·¨£º
Split(expression[, delimiter[, count[, start]]])
Split º¯ÊýµÄÓï·¨ÓÐÒÔϲÎÊý£º
²ÎÊý ÃèÊö
expression ±ØÑ¡¡£×Ö·û´®±í´ïʽ£¬°üº¬×Ó×Ö·û´®ºÍ·Ö¸ô·û¡£Èç¹û expression ΪÁ㳤¶È×Ö·û´®£¬Split ·µ»Ø¿ÕÊý×飬¼´²»°üº¬ÔªËغÍÊý¾ÝµÄÊý×é¡ ......
ÒÔÏÂΪÒýÓõÄÄÚÈÝ£º
<!--ÕâÊÇÒ»¸öÖ÷Ò³Îļþ-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>»ÃµÆÆ¬ÐÂÎÅ</title>
</head>
<body>
<!--#Include file="diaoyong.asp"-->
</body>
</html>
& ......