Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

Çóexcelµ¼ÈësqlserverÔ´Â룡aspµÄ£¡

ÈçÌ⣡
sqlserver¹ÜÀíÆ÷Óе¼È빦ÄܰÉ

ÔΣ¡ÄѵÀÒª¿Í»§È¥²Ù×÷Êý¾Ý¿â£¿£¡ÎÞÓïÁË£¡

ÔõôûÈ˻شðÄØ£¿£¡£¡£¡

¿Í»§½«excelÉÏ´«£¬ÉÏ´«µ½µÄÊÇ·þÎñÆ÷£¬¶ø²»ÊÇÔÚ±¾µØ£¡ 

¶ÁÊý¾Ý£¬Ð´Êý¾Ý£¬Ó¦¸ÃÊÇÕâÑù

http://topic.csdn.net/t/20030404/11/1617960.html


ÓÃsql×Ô´øµÄµ¼Èë¾Í¿ÉÒÔ£¡¹À¼ÆÊÇÏëÒªÔÚºǫֱ́½ÓʵÏÖÉÏÊöЧ¹û°É£¡

VB code:

Response.Charset="GB2312"
excelpath=server.mappath(Request("excelpath")) 'ÎļþÔÚ·þÎñÆ÷ÖеÄ·¾¶
dim uploadconn

set xlsConn=CreateObject("ADODB.Connection")
xlsConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=;Extended properties=Excel 5.0;Data Source="& excelpath


xlssql = "SELECT * from [Sheet1$]"
set rs = xlsConn.execute(xlssql)
while not rs.eof
sql = "insert into test values('"& fixsql(rs(0)) &"','"& fixsql(rs(1)) &"','"& fixsql(rs(2)) &"','"& fixsql(rs(3)) &"','"& fixsql(rs(4)) &"')"
response.Write sql&"<br>"
conn.execute(sql)
rs.movenext
wend

xlsConn.close
set xlsConn = nothing

function fixsql(str)
dim newstr
newstr = str
if isnull(newstr) then
newstr = ""
else
newstr = replace(newstr,"¡¯","¡¯¡¯")
end if


Ïà¹ØÎÊ´ð£º

ÎÒÏë×öÒ»¸öaspÍøÕ¾£¬µ«ÊDz»ÖªµÀ×öʲô£¡

×î½üÎÒͨ¹ýѧϰ£¬¸Ð¾õ×Ô¼ºÑ§µÄ»¹¿ÉÒÔÁË£¬Ïë×öÒ»ÍøÕ¾£¬µ«ÊÇÒ»Ö±¶¼ÕÒ²»µ½Ìâ²Ä£¬²»ÖªµÀ×öʲô£¬Ï£Íû¸÷λ¸øÎÒµãÒâ¼û£¬Èç¹ûÓÐÐèÇóÎĵµ¾Í¸üºÃÁË£¡Ï£Íû´ó¼Ò¸øÎÒµãÒâ¼û£¬Ð»Ð»£¡
ÏÈ×ö¸öÆóÒµÍøÕ¾°É£¬ÎҸоõÒ»¸öÈË×öÍøÕ¾²»ÊÊÒË ......

aspÔõÑùʵÏÖ¸ÊÌØÍ¼µÄЧ¹û£¿ - Web ¿ª·¢ / ASP

ÓÐË­Äܸø½²½²£¬Ôõô×öÂð£¿
ллÀ²£¡
¸ÊÌØÍ¼ ÊÇɶ£¿

½âÌâ˼·.¿´Ò»Ï½ø¶ÈÌõµÄÏÔʾ..
ÆäʵÄã¾ÍŪһ¶Ñtable ÿ¸ötableµÄ¿í¶È²»Í¬.µ×É«²»Í¬¼´¿É
µ±È»ÓÃdiv¿ØÖÆÎ»ÖøüºÃ

ÄãŪ100¸ötable¸ù¾Ý½ø¶ÈÆäÖÐǰ20¸ö·Ö¸øµ ......

¼òµ¥ÎÊÌ⣬asp±äÁ¿Ôõôд½øavascriptÀïÃæ°¡

ÓÐÁ½¸ö±äÁ¿ imgUrl1ºÍimgUrl2
Url1="images/1.jpg"
Url2="images/2.jpg"
Óиöjavascript³ÌÐò£¬Ïë°ÑUrl1ºÍUrl2´øµ½javascriptÀïÃæµÄimgUrl2ºÍimgUrl2£¬²»ÖªµÀÔõôŪ
<script type="t ......

asp.net Ï̵߳ÄÎÊÌ⣿ - .NET¼¼Êõ / ASP.NET

ǰ¶Îʱ¼äÅöµ½Ò»µÀÃæÊÔÌâÈçÏ£º
test.aspxÒ³ÃæÓÐÈçÏ´úÂ룺
 Response.Write(Test.GetDate());
TestÀàÈçÏ£º
public class Test
{
  static string dt="";
  public static s ......

ASP+ACCESSÊä³öÎÊÌâ - Web ¿ª·¢ / ASP

ÄÄÀï³ö´íÁË£¬Êä³öÕâÑùµÄ½á¹û£¿£¿
<%@ Page Language="VB" AutoEventWireup="false" aspcompat="true" CodeFile="Default.aspx.vb" Inherits="_Default" %&g ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ