Çó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
Ïà¹ØÎÊ´ð£º
ÎÒÃÇÓÐÒ»¸öÍøÕ¾Ä£°å£¬www.c111.com.cn,Ï£ÍûÐÞ¸ÄһЩµØ·½£º
1£©µã»÷×ó²à¡°·þÎñÆ·ÅÆ¡±µÄÆäÖÐÒ»¸öС·ÖÀ࣬Èç¡°×ãÇò¡±£¬½çÃæµÄÓÒ²à¾Í³öÏÖÈçwww.c111.com.cn/1.jpg£¬µã»÷1.jpgÉÏ·½µÄÆäÖÐÒ»¸öÆ·ÅÆlogo£¬ÏÂÃæ¾Í³öÏÖÏà¹ØµÄÍ ......
ÓÐÄÄλ¸ßÊÖÓùýASP FCKÔÚÏß±à¼Æ÷ѽ£¬ËüÄǸöͼƬÉÏ´«¹¦ÄÜÔõôÅäÖÃѽ
ÄܸøÎÒ·¢¸öÄÜÓÃFCKÔÚÏß±à¼Âð£¿Ò»¶¨ÄÜÉÏ´«Í¼Æ¬¹¦ÄܵÄѽ£¬¼±Ñ½
Ö±½Óµ½¹Ù·½ÍøÕ¾È¥Ï¸ö¾Í¿ÉÒÔÁË£¬¹ØÓÚÉèÖÃô£¬Ö±½ÓGOOGLEÒ»ÏÂÄãµÄ°æ±¾ºÅ¾Í¿ÉÒÔÕÒµ ......
±¾ÈËÓÐÈýÄ꿪·¢¾Ñé,ÏÖÔÚÕÒ¹¤×÷(ÏÃÃÅ),,,ÓÐÒâÕßÇëÁªÏµQQ:523054271
1.5Ä깤×÷¾ÑéÕÒ¹¤×÷ ËûÒª¶àÉÙ ÎÒÒªÒ»°ë~~
±ð˵ÈýÄêµÄÁË...¾ÍÊÇ5ÄêµÄÒ²Ò»×¥Ò»´ó°Ñ.....
°³ÐèÒªÓÃasp+access×öÒ»¸ö½øÏú´æÈí¼þ£¬ÄúÄÜ×ö ......
²»ÊÇÖ±½Ó´ò¿ª£¬¶øÊǶÁÈ¡ÄÚÈÝ£¬È»ºó¿ÉÒÔ²Ù×÷µÄÊý¾Ý£¬¿ÉÒÔ´æ´¢µ½Êý¾Ý¿â»òÕßÏÔʾÔÚÒ³ÃæÉÏ¡£
wordÎļþÔÚ·þÎñÆ÷¶Ë¡£
¿ÉÒÔ¿¼ÂÇÓõÚÈý·½×é¼þ
http://officewriter.softartisans.com/officewriter-372.aspx
ÓÐÖÐÎÄ˵ ......
import java.sql.Connection;
import java.sql.Date;
import java.sql.DriverManager;
import java.sql.ResultSet;
import java.sql.SQLException;
import java.sql.Statement;
public class QueryTest&n ......