asp fckeditor×Ô¶¨ÒåÉÏ´«ÎļþµÄÎļþÃû
Ö»ÐèÒªÔÚfckeditor\editor\filemanager\connectors\aspÎļþ¼ÐϵÄcommands.aspÐÞ¸Äһϼ´¿É
ÔÚÕâ¸öÎļþÖвéÕÒһϣºFileUpload
»áÕÒµ½Õâ¸öº¯Êý
°Ñ
´úÂëÈçÏÂ:
Dim sFilePath
sFilePath = CombineLocalPaths(sServerDir, sFileName)
¸ÄΪ
´úÂëÈçÏÂ:
Dim sFilePath,ranNum
Randomize
ranNum=int(90000*rnd)+10000
sFilePath = CombineLocalPaths(sServerDir, year(now)&month(now)&day(now)&hour(now)&minute(now)&second(now)&"."&sExtension)
¼´¿É
Ïà¹ØÎĵµ£º
<%
set rs=server.createobject("adodb.recordset")
sql="select * from YONGHU where (ID is null)"
rs.open sql,conn,1,3
rs.addnew
rs("USERNAME")=request("username")
rs.update
rs.close
set rs=nothing
conn.close
set conn=nothing
session("username")=rs("name")
respo ......
ǰ¼¸ÌìÔÚ×Ô¼ºµÄ±Ê¼Ç±¾Éϰ²×°ÁËOFFICE2007¡£½ñÌì×öÁËÒ»¸ö°Ù¶ÈÓÑÇéÁ´½Ó¼ì²éµÄ¹¤¾ß£¬ ÔÚÁ¬½ÓACCESS2007Êý¾Ý¿âµÄʱºò£¬Ê¹ÓõÄÇý¶¯´úÂëΪ£º"provider=microsoft.jet.oledb.4.0;data source="&server.mappath("queryrecord.mdb") ¡£È··¢ÏÖÌáʾ£º
Microsoft JET Database Engine ´íÎó ''80004005''
²»¿Éʶ±ðµÄÊý¾Ý¿â¸ñʽ
µ« ......
<%
dim db
set db=Server.CreateObject("Adodb.Connection")
db.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=" & Server.Mappath("../mdb/count.mdb")
dim strSql,rs,visitNum
strSql="Select visitNum from counter "
SET rs=db.Execute(strSql)
if session("agai ......
VBSÀ³¬³öIntegerÀàÐ͵Äȡֵ·¶Î§£¬¸ÃÀàÐ͵Äȡֵ·¶Î§Îª-32,768 µ½ 32,767 Ö®¼äµÄÕûÊý¡£
³ö´íµÄ¸ùÔ´£º
ÔÚASPÀÓÐʱºòΪÁË·ÂÖ¹×¢È룬ËùÒÔÔÚ½ÓÊÕ²ÎÊýµÄʱºòÖ±½ÓʹÓÃCintº¯Êý°Ñ½Ó¹ýÀ´µÄ²ÎÊýת»»ÎªInteger£¨Êý×Ö£©ÀàÐÍ£¬Õâ¾Í´æÔÚÒ»¸öDZÔÚÎÊÌ⣬µ±Ò³Ãæ½ÓÊÕµÄij¸ö²ÎÊý£¨Request("xxx")£©³¬¹ýȡֵ·¶Î§Ê±£¨¿É¼òµ¥Àí½âΪ5λÊý×Ö£ ......
Try
Dim Path As String = Server.MapPath("~/Download/") 'Îļþ·¾¶
Path = Path & "file.txt" 'ÎļþµÄÃû³Æ
......