ado sqlserver ´æ´¢¹ý³Ì - MS-SQL Server / ÒÉÄÑÎÊÌâ
Õâ¸öÀý³ÌÊý¾Ý¿âpubs´æ´¢¹ý³Ìreptq1ÄÜÕýÈ·Ö´ÐУ¬
¸Ä³É×Ô¼ºµÄÊý¾Ý¿âºÍ´æ´¢¹ý³Ì¾Í±¨´í3704£¨Ó¦ÓóÌÐò¶¨Òå»ò¶ÔÏó¶¨Òå´íÎó£©
´æ´¢¹ý³ÌÔÚ²éѯ·ÖÎöÆ÷ÄÜÕýÈ·Ö´ÐУ¬¶øÇÒÒ»Ö±ÔÚÓõģ¬ÕæÊÇÔÎËÀ¡£
Private Sub CommandButton5_Click()
Dim cnn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Dim adocmd As New ADODB.Command
Dim SQL As String, mydata As String
Dim i As Integer
cnn.ConnectionString = "Provider = SQLOLEDB.1;Data Source = ibm;Initial Catalog = pubs;User ID =sa;Password =;"
cnn.Open
Set adocmd.ActiveConnection = cnn 'ָʾָ¶¨µÄ Command¶ÔÏóµ±Ç°ËùÊôµÄ Connection¶ÔÏó
adocmd.CommandText = "reptq1" 'ÉèÖÃCommand¶ÔÏóÔ´
adocmd.CommandType = adCmdStoredProc '֪ͨÌṩÕßCommandTextÊôÐÔÊÇ´æ´¢¹ý³Ì
Set rs = adocmd.Execute
Cells.Clear
For i = 0 To rs.Fields.Count - 1
Cells(1, i + 1) = rs.Fields(i).Name
Next i
Range("a2").CopyfromRecordset rs
Cells.Columns.AutoFit
rs.Close
cnn.Close
Set rs = Nothing
Set cnn = Nothing
End Sub
¼ì²éһϴ洢¹ý³ÌÖзµ»ØµÄ×Ö¶ÎÃûÊÇ·ñºÍǰ¶ËÒýÓõķûºÏ
ÔÚ×Ô¼ºÊý¾Ý¿â´´½¨Ò»¸ö¼òµ¥Ò»µãµÄ´æ´¢¹ý³ÌÒ²ÄÜÖ´Ðеģ¬ÄѵÀÊÇÏÂÃæ´æ´¢¹ý³ÌÊǶ¯Ì¬µÄÔÒò£¿
CREATE PROCEDURE smzls_tzd AS
create table #t(userid nvarchar(12),nmtabnum int,amtabnum int,watermete decimal,totmoneydx decimal(10,2),intabmanname nvarchar(10))
declare @sql varchar(8000)
select @sql
Ïà¹ØÎÊ´ð£º
Ö´ÐеÄ˳Ðò£º
1£©Îļþä¯ÀÀ¿ò£¨Ñ¡ÔñÎļþʹÓã©
Ñ¡ÔñºÃÎļþºó
µã»÷Ò»¸öµ¼Èë°´Å¥µÄʱºò £¬°ÑÉÏÃæÉÏ´«¿òÀïµÄcsvÎļþÒÔÒ»¸öIDΪÎļþÃû£¬ÉÏ´«µ½**/**Îļþ¼ÐÏÂ
2£©¶ÁÈ¡Õâ¸öÎļþ¼ÐϵÄcsvµÄÎļþ£¬×ª»»³Ésql
3 ......
ÎÒÓжà¸ö±íA B C ½á¹¹ÊÇÒ»ÑùµÄ£¬¶¼ÓÐ2¸ö×Ö¶ÎnameºÍcontent,ÎÒÒªËÑË÷ËùÒÔ±íËùÓÐ×Ö¶ÎÖаüº¬¡°Öйú¡±µÄÄÚÈÝ Õâ¸öSQLÓï¾äÔõôд
ÈçºÎ½«¶à¸ö±íµÄ²éѯ½á¹ûÁ¬³ÉÒ»¸ö±í Õâ¸öSQLÓï¾äÔõôд ±íµÄ½á¹¹ÊÇÒ»ÑùµÄ
ÀýÈç£ ......
¿ÉÄÜÒòΪ¹¤×÷µÄÔÒò ½Ó´¥Êý¾Ý¿âÕâ¿é±È½ÏÉÙ£¬Ö®Ç°¶¼ÊÇ×ö³ÌÐòÕâ¿é£¬Êý¾Ý¿âÕâ¿é¶¼ÓÐרÃŵÄÈËÀ´×ö ·Ö¹¤¶¼ºÜÃ÷ϸ ËùÒÔ¶ÔÊý¾Ý¿âÕâÒ»¿éÍêÈ«²»Á˽⡣ǰ¶Îʱ¼ä È¥ÃæÊÔÁ˼¸¼Ò¹«Ë¾ ¼¸ºõ¶¼ÊÇÔÚÊý¾Ý¿âÕâ¿é¹ÒµôµÄ Á¬¸ö¼òµ¥µÄSQ ......
ÏÖÔÚÓÐÁ½ÕÅ±í£ºÎÄÕÂÖ÷±íA(articleId,articleTitle)£¬ÎÄÕÂÆÀÂÛ±íB(commentId,articleId,commentTitle)
ÏÖÔÚÎÒÏëʵÏÖÕâÑùµÄ¹¦ÄÜ£ºÁгöÎÄÕÂÁÐ±í£¬ÆäÖÐÿƪÎÄÕ±êÌâÏÂÃæÁгö´ËÎÄÕµÄǰ2¸öÎÄÕÂÆÀÂÛ£¬ÇëÎÊsqlÓï¾äÔõôд°¡ ......
1¡£ÔõÑùʹxp_cmdshellÄÜÍêÕûÊä³ö³¬¹ý255¸ö×Ö·ûµÄ×Ö·û´®¡£
2¡£select ʱ£¬¼ìË÷ËÙ¶ÈÊÇÓëfromºóµÄ TABLE˳ÐòÓйأ¬»¹ÊÇÓëwhereÌõ¼þµÄ˳ÐòÓйØ(TABLEÊý¾Ý¶àÉÙ )
ÔÚϵͳÊôÐÔÉ趨ÀïÓиöÑ¡Ïî,¿ÉÒÔÐ޸ĵ¥×Ö¶ÎÊä³ö×ÖÊýÏÞÖÆ. ......