- ©«¤l
- 1
- ¥DÃD
- 1
- ºëµØ
- 0
- ¿n¤À
- 8
- ÂI¦W
- 0
- §@·~¨t²Î
- windows xp
- ³nÅ骩¥»
- office 2003
- ¾\ŪÅv
- 10
- ©Ê§O
- ¤k
- µù¥U®É¶¡
- 2011-3-17
- ³Ì«áµn¿ý
- 2011-3-24
|
[µo°Ý] ºô¸ô¸Õ¨÷°õ¦æ¥X²{80040e21°T®§
°T®§¡G
Microsoft OLE DB Provider for ODBC Drivers error '80040e21'
ODBC driver does not support the requested properties.
/fm2011/exam/grad.asp, line 28
--------------------------------------«ö·Ó¤p»xª©¤jªº¤º®e--------------------------------------------------
'©Ó±µ¨Ó¦Ûquestion.aspªº¸ê®Æ
studentname=Request("studentname")
number=Request("number")
'¶}±Òexam.mdb¸ê®Æ®w¤¤ªºfirst¦ÒÃD¸ê®Æªí
'¦b¦¹¶}±Ò¸ê®Æ®w¬O¥Î¨ÓŪ¨úµª®×»P¼g¤Jpºâ«áªº¦¨ÁZ
'«Ø¥ß¸ê®Æ®w³sµ²ª«¥óconobject
Set conobject = Server.CreateObject("ADODB.Connection")
'§Q¥ÎMapPath¤èªk¨ú±o¸ê®Æ§¹¾ã¯u¹ê¸ô®|
DBPath = Server.MapPath("/fm2011/db/exam.mdb")
'§Q¥ÎOpen¤èªk¥´¶}¸ê®Æ®w
conobject.Open "Driver={Microsoft Access Driver (*.mdb)};DBQ="&DBPath
'«Ø¥ß¦s¨ú¸ê®Æ®wª«¥órecobject
Set recobject=Server.CreateObject("ADODB.Recordset")
'Ū¨ú¸ê®Æªí¤º®e
sql="SELECT * From "&"first"&" ORDER by ÃD¸¹"
recobject.Open sql,conobject,1,1,1 ²Ä28¦æ¿ù»~°T®§
'¥ý±N¸ê®Æªíªº¸ê®Æ¿ý²¾¦Ü²Ä¤@µ§
recobject.MoveFirst
'¥ý±NpºâªºÁ`¤À³]¬°¢¯
Score=0
Response.Write "<div align=center><font color=green face=·s²Ó©úÅé size=6>ºô¸ô¸Õ¨÷-¦¨ÁZ§å§ï</font></div>"
'±N¥¿½Tµª®×¤Î¨ü´ú¾Ç¥Í¿ïªºµª®×¤@°_Åã¥Ü¤ñ¹ï
Do While Not recobject.EOF
Sel=Request("No"&recobject(2))
Ans=recobject(8)
----------------------------------------------------------------------------------------
§Ú¬O©óhttp://www.jabry.com/¸Óºô¯¸¥Ó½ÐªÅ¶¡ªº¡C
¸Û¼°½Ð°Ý¸Ó¦p¦ó×§ï!? |
|