Znn3bq.jpeg
ÉÇÍ·´óѧº£Ñó¿ÆÑ§½ÓÊܵ÷¼Á
²é¿´: 1058  |  »Ø¸´: 1

keke226

Ìú¸Ëľ³æ (ÕýʽдÊÖ)

[ÇóÖú] ¹ØÓÚVisual studioÔËÐÐVB½Å±¾ÖУ¬²éѯACCESSÊý¾Ý¿âËùÓõÄSQLÓïÑÔÖÐÒýÈë±äÁ¿µÄÎÊÌâ

×î½üдһ¸ö³ÌÐò£¬ÔËÐл·¾³VS2010£¬ÓÃVB±à³Ì£¬Á¬½ÓACCESS2010Êý¾Ý¿âÏëʵÏÖÈçϹ¦ÄÜ£º
ÔÚWebÍøÒ³ÖÐÉú³ÉÒ»¸öDownDropList£¬Ò»¸öButtonºÍÒ»¸öListBox£¬Ïëͨ¹ýDownDropListÀïÃæÑ¡Ôñ²»Í¬µÄItem£¬È»ºóµã»÷ButtonÀ´ÊµÏÖ¶ÔACCESSÊý¾Ý¿âµÄ²éѯ¹¦ÄÜ£¬µ«ÊÇ·¢ÏÖÔÚÔËÐгÌÐòʱ£¬×ÜÊÇÌáʾmycmd.ExecuteReader()ȱÉÙÖµ£¬Ó¦¸ÃÊÇSELECTÓï¾äÀïµÄ±äÁ¿³öÁËÎÊÌ⣨ÏÂÃæ´úÂëÖеĴÖÌå¾ä£©£¬ÇëÎÊÈçºÎÕâ¸öSOLÓï¾äÖÐÒýÈë±äÁ¿£¿£¿£¿


    Protected Sub Button1_Click(sender As Object, e As System.EventArgs) Handles Button1.Click
        If DropDownList1.SelectedItem.Text = "ËùÓбÈÈü" Then
            Dim mystr As String, mysql As String
            Dim myconn As New OleDbConnection()
            Dim mycmd As New OleDbCommand()
            mystr = "Provider = Microsoft.ACE.OLEDB.12.0;" & "Data source = " & Server.MapPath("~\\App_data\\game.accdb"
            myconn.ConnectionString = mystr
            myconn.Open()
            mysql = "SELECT ±ÈÈüÈÕÆÚ,Ö÷¶Ó,¿Í¶Ó,С×é FROM Game"
            mycmd.CommandText = mysql
            mycmd.Connection = myconn
            Dim myreader As OleDbDataReader = mycmd.ExecuteReader()
            ListBox1.Items.Add("±ÈÈüÈÕÆÚ Ö÷¶Ó ¿Í¶Ó С×é"
            ListBox1.Items.Add("========"
            While myreader.Read()
                ListBox1.Items.Add(String.Format("{0} {1} {2} {3}", myreader(0).ToString(), myreader(1).ToString, myreader(2).ToString, myreader(3).ToString))
            End While
            myconn.Close()
            myreader.Close()
        Else
            Dim mystr As String, mysql As String, str As String
            Dim myconn As New OleDbConnection()
            Dim mycmd As New OleDbCommand()
            mystr = "Provider = Microsoft.ACE.OLEDB.12.0;" & "Data source = " & Server.MapPath("~\\App_data\\game.accdb"
            myconn.ConnectionString = mystr
            str = DropDownList1.SelectedItem.Text
            myconn.Open()
            mysql = "SELECT ±ÈÈüÈÕÆÚ,Ö÷¶Ó,¿Í¶Ó,С×é FROM Game where Ö÷¶Ó or ¿Í¶Ó=" + DropDownList1.SelectedItem.Text.ToString
            mycmd.CommandText = mysql
            mycmd.Connection = myconn
            Dim myreader As OleDbDataReader = mycmd.ExecuteReader()
            ListBox1.Items.Add("±ÈÈüÈÕÆÚ Ö÷¶Ó ¿Í¶Ó С×é"
            ListBox1.Items.Add("========"
            While myreader.Read()
                ListBox1.Items.Add(String.Format("{0} {1} {2} {3}", myreader(0).ToString(), myreader(1).ToString, myreader(2).ToString, myreader(3).ToString))
            End While
            myconn.Close()
            myreader.Close()
        End If
    End Sub
»Ø¸´´ËÂ¥

» ²ÂÄãϲ»¶

¶ÁÊ騥Äê¾ëд×Ö£¬Èç½ñ·­Ê鲻ʶ־£¬ÈôÖª¾ìÊé»Úǰ³Ì£¬ÎÞÈçÓæéÔδʶʱ¡£ÈýÄêµ£²ñÊìɽÐÔ£¬ÈýÄê¿àÍøÚÏË®ÐÚ£¬Ç°³ÌÔÚÐÄ×Ô¾ëÊæ£¬Ê¶Ö¾ºÎÓÃÊéÖÐÇå¡£
ÒÑÔÄ   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû

ÑôÑ©¶ù

гæ (СÓÐÃûÆø)

2Â¥2016-12-27 19:11:50
ÒÑÔÄ   ¹Ø×¢TA ¸øTA·¢ÏûÏ¢ ËÍTAºì»¨ TAµÄ»ØÌû
Ïà¹Ø°æ¿éÌø×ª ÎÒÒª¶©ÔÄÂ¥Ö÷ keke226 µÄÖ÷Ìâ¸üÐÂ
×î¾ßÈËÆøÈÈÌûÍÆ¼ö [²é¿´È«²¿] ×÷Õß »Ø/¿´ ×îºó·¢±í
[¿¼ÑÐ] ҩѧ305Çóµ÷¼Á +6 Â꿨°Í¿¨boom 2026-04-11 6/300 2026-04-14 19:48 by zhouxiaoyu
[¿¼ÑÐ] 085500Çóµ÷¼Á²ÄÁÏ +11 Ò×11122 2026-04-09 11/550 2026-04-14 17:59 by lhj2009
[¿¼ÑÐ] ²ÄÁÏÏà¹Ø×¨Òµ344Çóµ÷¼ÁË«·Ç¹¤¿ÆÑ§Ð£»ò¿ÎÌâ×é +21 hualkop 2026-04-12 22/1100 2026-04-14 17:44 by lhj2009
[¿¼ÑÐ] Ò»Ö¾Ô¸»ªÄÏÀí¹¤´óѧ331·Ö²ÄÁÏÇóµ÷¼Á +10 ÌìÏÂww 2026-04-09 11/550 2026-04-13 23:25 by pies112
[¿¼ÑÐ] 0831Ò»ÂÖµ÷¼Áʧ°ÜÇóÖú +10 СÐÜî£î£_s 2026-04-11 10/500 2026-04-12 22:43 by ³¤¹­°Á
[¿¼ÑÐ] Ò»Ö¾Ô¸»ªÖÐũ΢ÉúÎ288·Ö£¬ÈýÄêʵÑé¾­Àú +11 ´úfish 2026-04-09 11/550 2026-04-12 10:21 by Hayaay
[¿¼ÑÐ] Çóµ÷¼Á£¬262»úеר˶ +8 àÅyyl 2026-04-08 8/400 2026-04-12 02:31 by Çï¶¹²ËÑ¿
[¿¼ÑÐ] 0860004 Çóµ÷¼Á 309·Ö +9 Yin DY 2026-04-08 9/450 2026-04-11 22:55 by dongdian1
[¿¼ÑÐ] Ò»Ö¾Ô¸Ïôó0856£¬306Çóµ÷¼Á +15 Bblinging 2026-04-11 15/750 2026-04-11 22:53 by 314126402
[¿¼ÑÐ] 086003µ÷¼ÁÇóÖú +21 ËÕß®Íò 2026-04-09 22/1100 2026-04-11 20:25 by dongdian1
[¿¼ÑÐ] 284Çóµ÷¼Á +11 archer.. 2026-04-09 12/600 2026-04-11 20:23 by À¶ÔÆË¼Óê
[¿¼ÑÐ] 085400 328·Ö Çóµ÷¼Á +10 ιÄãÒ»¸ö´ó³È×Ó 2026-04-09 14/700 2026-04-11 19:53 by lqspecial
[¿¼ÑÐ] Çóµ÷¼Á +3 θ¾·ÂÎÀÛÁË 2026-04-11 5/250 2026-04-11 14:13 by luhong1990
[¿¼ÑÐ] 085410-273Çóµ÷¼Á +6 X1999 2026-04-10 6/300 2026-04-11 10:32 by Delta2012
[¿¼ÑÐ] 283Çóµ÷¼Á£¬¹¤¿Æ£¡ +12 ËÕ´òË®7777 2026-04-08 12/600 2026-04-11 10:28 by ÄæË®³Ë·ç
[¿¼ÑÐ] 289 ·Ö105500ҩѧר˶Çóµ÷¼Á(ÕÒBÇøÑ§Ð£) +6 °×ÔÆ123456789 2026-04-09 8/400 2026-04-10 21:13 by zhouxiaoyu
[¿¼ÑÐ] 293µ÷¼Á +25 yj1221 2026-04-08 26/1300 2026-04-10 15:02 by ²ñС°×
[¿¼ÑÐ] ¿¼Ñе÷¼Á-²ÄÁÏÀà-284 +28 Ïë»»ÊÖ»ú²»Ïë½âÊ 2026-04-08 28/1400 2026-04-09 20:08 by µ¹Êý321?
[¿¼ÑÐ] 332£¬085601Çóµ÷¼Á +12 ydfyh 2026-04-09 14/700 2026-04-09 17:28 by wp06
[¿¼ÑÐ] 086004 Çóµ÷¼Á 309 +7 Yin DY 2026-04-08 7/350 2026-04-09 13:59 by Delta2012
ÐÅÏ¢Ìáʾ
ÇëÌî´¦ÀíÒâ¼û