ASP CommandʹÓÃʱ³ö´í - Web ¿ª·¢ / ASP
ʹÓòÎÊýÐÍCommand³öÏÖÏÂÁдíÎ󡣺ìÉ«´¦
ADODB.Command ´íÎó '800a0bb9'
²ÎÊýÀàÐͲ»ÕýÈ·£¬»ò²»ÔÚ¿ÉÒÔ½ÓÊܵķ¶Î§Ö®ÄÚ£¬»òÓëÆäËû²ÎÊý³åÍ»¡£
/asp/Test.asp£¬ÐÐ 37
VB code:
set conn=server.CreateObject("ADODB.connection")
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("db.mdb")
set cmd=server.CreateObject("ADODB.command")
cmdText_INSERT="insert into ComputeInfo(ComputeName,IP,MAC,CPU,DNSName) values(?,?,?,?,?)"
set cmd.ActiveConnection=conn
cmd.CommandType=adCmdText
cmd.CommandText=cmdText_INSERT
set PrmName=cmd.CreateParameter("ComputeName",adVarChar,adParamInput,30)
set PrmIP=cmd.CreateParameter("IP",adVarChar,adParamInput,15)
set PrmMAC=cmd.CreateParameter("MAC",adVarChar,adParamInput,17)
set PrmCPU=cmd.CreateParameter("CPU",adVarChar,adParamInput,45)
set PrmDNSName=cmd.CreateParameter("DNSName",adVarChar,adParamInput,50)
cmd.Parameters.Append PrmName
cmd.Parameters.Append PrmIP
cmd.Parameters.Append PrmMAC
cmd.Parameters.Append PrmCPU
cmd.Parameters.Append PrmDNSName
PrmName.Value=Request.Form("txtComputeNam
Ïà¹ØÎÊ´ð£º
ÓÐÒ»¸öÀà
class adc
{
dim a,b,c
}
ÈçºÎÔÚÁíÍâÒ»¸öÀàÖÐÈ¡µÃÀà³ÉÔ±¼°³ÉÔ±¸öÊý
class getmenber
{
dim menbers()
function getmenbers(resclass)
'resΪһδ֪Àà
'getmenber ......
Microsoft JET Database Engine '80040e07'
±ê×¼±í´ïʽÖÐÊý¾ÝÀàÐͲ»Æ¥Åä¡£
\wwwroot\update.asp, line 20
--------------------------------------------------------------------------------
Ho ......
ÎÒÓÐÁ½¸ödropdownlist¶¼°óºÃÁËÖµ£¬ÏëÑ¡ÖÐÒ»¸ödropdownlistÖеÄÖµ£¬È»ºóÔÚÁíÒ»¸ödropdownlistÖÐÑ¡ÖÐÏàÓ¦µÄÒ»Ïî¡£
²»ÊÇ´Óа󶨵ڶþ¸ödropdownlist£¬ÊÇÔÚÒѾ°óºÃµÄÖµµ±ÖÐÑ¡ÖÐÒ»¸ö¡£
ÎÒÏëÓÃjsд
ÇóÖú
Äã¿ÉÒÔ°Ñdrop ......
¹ØÓÚÍøÕ¾°²È«µÄÎÊÌ⣡
ÎÒÁ˽⵽µÄÍøÕ¾°²È«ÎÊÌâ°üÀ¨£º
sql×¢Èë©¶´ºÍ±©¿â©¶´»¹ÓÐÉÏ´«Â©¶´
³ýÁËÕâЩ»¹ÓÐÆäËûµÄ©¶´Ã´£¿
×¢Èë©¶´¿ÉÒÔͨ¹ý¹ýÂËÀ´·ÀÖ¹
±©¿â©¶´Ôõô·ÀÖ¹
»¹ÓÐÈËÉÏ´«µÄľÂíÊÇ.gif
ÕâÖÖ©¶´Ôõôȥ± ......
<a href="../Help/HelpCenter.aspx?artsub=ÁªÏµÎÒÃÇ"target="_blank">
½øÐд«µÝ
string Name = "ÖÐÎIJÎÊý";
Response.Redirect("B.aspx?Name="+Ser ......