{"id":144990,"date":"2024-11-01T10:04:10","date_gmt":"2024-11-01T02:04:10","guid":{"rendered":"https:\/\/server.hk\/cnblog\/144990\/"},"modified":"2024-11-01T10:04:11","modified_gmt":"2024-11-01T02:04:11","slug":"vb-%e6%95%b8%e6%93%9a%e5%ba%ab%e7%b7%a8%e7%a8%8b%e5%af%a6%e4%be%8b%e6%ba%90%e7%a2%bc%e8%b3%9e%e6%9e%90-vb-%e6%95%b8%e6%93%9a%e5%ba%ab%e7%b7%a8%e7%a8%8b%e5%af%a6%e4%be%8b%e6%ba%90%e7%a2%bc","status":"publish","type":"post","link":"https:\/\/server.hk\/cnblog\/144990\/","title":{"rendered":"VB \u6578\u64da\u5eab\u7de8\u7a0b\u5be6\u4f8b\u6e90\u78bc\u8cde\u6790 (vb \u6578\u64da\u5eab\u7de8\u7a0b\u5be6\u4f8b\u6e90\u78bc)"},"content":{"rendered":"<h1 id=\"vb-%e6%95%b8%e6%93%9a%e5%ba%ab%e7%b7%a8%e7%a8%8b%e5%af%a6%e4%be%8b%e6%ba%90%e7%a2%bc%e8%b3%9e%e6%9e%90-FKYQGTHuSU\">VB \u6578\u64da\u5eab\u7de8\u7a0b\u5be6\u4f8b\u6e90\u78bc\u8cde\u6790<\/h1>\n<p>\u5728\u7576\u4eca\u7684\u8edf\u4ef6\u958b\u767c\u4e2d\uff0c\u6578\u64da\u5eab\u7de8\u7a0b\u662f\u4e00\u500b\u4e0d\u53ef\u6216\u7f3a\u7684\u90e8\u5206\u3002Visual Basic\uff08VB\uff09\u4f5c\u70ba\u4e00\u7a2e\u7c21\u55ae\u6613\u5b78\u7684\u7de8\u7a0b\u8a9e\u8a00\uff0c\u5ee3\u6cdb\u61c9\u7528\u65bc\u6578\u64da\u5eab\u61c9\u7528\u7a0b\u5e8f\u7684\u958b\u767c\u3002\u672c\u6587\u5c07\u901a\u904e\u4e00\u4e9b\u5be6\u4f8b\u6e90\u78bc\u4f86\u8cde\u6790 VB \u6578\u64da\u5eab\u7de8\u7a0b\u7684\u57fa\u672c\u6982\u5ff5\u548c\u5be6\u8e10\u3002<\/p>\n<h2 id=\"vb-%e6%95%b8%e6%93%9a%e5%ba%ab%e7%b7%a8%e7%a8%8b%e7%9a%84%e5%9f%ba%e6%9c%ac%e6%a6%82%e5%bf%b5-FKYQGTHuSU\">VB \u6578\u64da\u5eab\u7de8\u7a0b\u7684\u57fa\u672c\u6982\u5ff5<\/h2>\n<p>VB \u6578\u64da\u5eab\u7de8\u7a0b\u4e3b\u8981\u6d89\u53ca\u8207\u6578\u64da\u5eab\u7684\u9023\u63a5\u3001\u6578\u64da\u7684\u67e5\u8a62\u3001\u63d2\u5165\u3001\u66f4\u65b0\u548c\u522a\u9664\u7b49\u64cd\u4f5c\u3002VB \u63d0\u4f9b\u4e86\u591a\u7a2e\u6578\u64da\u5eab\u9023\u63a5\u65b9\u5f0f\uff0c\u5176\u4e2d\u6700\u5e38\u7528\u7684\u662f ADO\uff08ActiveX Data Objects\uff09\u3002ADO \u5141\u8a31\u958b\u767c\u8005\u901a\u904e\u7c21\u55ae\u7684\u4ee3\u78bc\u4f86\u64cd\u4f5c\u6578\u64da\u5eab\u3002<\/p>\n<h2 id=\"%e7%92%b0%e5%a2%83%e8%a8%ad%e7%bd%ae-FKYQGTHuSU\">\u74b0\u5883\u8a2d\u7f6e<\/h2>\n<p>\u5728\u958b\u59cb\u7de8\u5beb VB \u6578\u64da\u5eab\u7a0b\u5e8f\u4e4b\u524d\uff0c\u9996\u5148\u9700\u8981\u8a2d\u7f6e\u958b\u767c\u74b0\u5883\u3002\u901a\u5e38\uff0c\u958b\u767c\u8005\u6703\u4f7f\u7528 Visual Studio \u4f5c\u70ba\u958b\u767c\u5de5\u5177\uff0c\u4e26\u78ba\u4fdd\u5df2\u5b89\u88dd\u76f8\u61c9\u7684\u6578\u64da\u5eab\u7ba1\u7406\u7cfb\u7d71\uff08\u5982 SQL Server \u6216 Access\uff09\u3002<\/p>\n<h2 id=\"%e6%95%b8%e6%93%9a%e5%ba%ab%e9%80%a3%e6%8e%a5%e7%a4%ba%e4%be%8b-FKYQGTHuSU\">\u6578\u64da\u5eab\u9023\u63a5\u793a\u4f8b<\/h2>\n<p>\u4ee5\u4e0b\u662f\u4e00\u500b\u7c21\u55ae\u7684 VB \u7a0b\u5e8f\u793a\u4f8b\uff0c\u5c55\u793a\u5982\u4f55\u9023\u63a5\u5230 SQL Server \u6578\u64da\u5eab\uff1a<\/p>\n<pre><code>\nDim conn As New OleDbConnection(\"Provider=SQLOLEDB;Data Source=your_server;Initial Catalog=your_database;User ID=your_username;Password=your_password;\")\nTry\n    conn.Open()\n    MessageBox.Show(\"\u6578\u64da\u5eab\u9023\u63a5\u6210\u529f\uff01\")\nCatch ex As Exception\n    MessageBox.Show(\"\u6578\u64da\u5eab\u9023\u63a5\u5931\u6557\uff1a\" &amp; ex.Message)\nFinally\n    conn.Close()\nEnd Try\n<\/code><\/pre>\n<p>\u5728\u9019\u6bb5\u4ee3\u78bc\u4e2d\uff0c\u6211\u5011\u4f7f\u7528\u4e86 OleDbConnection \u985e\u4f86\u5efa\u7acb\u8207 SQL Server \u7684\u9023\u63a5\u3002\u9700\u8981\u6ce8\u610f\u7684\u662f\uff0c\u9023\u63a5\u5b57\u7b26\u4e32\u4e2d\u7684\u53c3\u6578\u9700\u8981\u6839\u64da\u5be6\u969b\u60c5\u6cc1\u9032\u884c\u4fee\u6539\u3002<\/p>\n<h2 id=\"%e6%95%b8%e6%93%9a%e6%9f%a5%e8%a9%a2%e7%a4%ba%e4%be%8b-FKYQGTHuSU\">\u6578\u64da\u67e5\u8a62\u793a\u4f8b<\/h2>\n<p>\u4e00\u65e6\u6210\u529f\u9023\u63a5\u5230\u6578\u64da\u5eab\uff0c\u5c31\u53ef\u4ee5\u9032\u884c\u6578\u64da\u67e5\u8a62\u3002\u4ee5\u4e0b\u662f\u4e00\u500b\u67e5\u8a62\u6578\u64da\u7684\u793a\u4f8b\uff1a<\/p>\n<pre><code>\nDim cmd As New OleDbCommand(\"SELECT * FROM your_table\", conn)\nDim reader As OleDbDataReader\n\nTry\n    conn.Open()\n    reader = cmd.ExecuteReader()\n    While reader.Read()\n        Console.WriteLine(reader(\"column_name\").ToString())\n    End While\nCatch ex As Exception\n    MessageBox.Show(\"\u67e5\u8a62\u5931\u6557\uff1a\" &amp; ex.Message)\nFinally\n    reader.Close()\n    conn.Close()\nEnd Try\n<\/code><\/pre>\n<p>\u5728\u9019\u6bb5\u4ee3\u78bc\u4e2d\uff0c\u6211\u5011\u4f7f\u7528 OleDbCommand \u985e\u4f86\u57f7\u884c SQL \u67e5\u8a62\uff0c\u4e26\u4f7f\u7528 OleDbDataReader \u4f86\u8b80\u53d6\u67e5\u8a62\u7d50\u679c\u3002<\/p>\n<h2 id=\"%e6%95%b8%e6%93%9a%e6%8f%92%e5%85%a5%e7%a4%ba%e4%be%8b-FKYQGTHuSU\">\u6578\u64da\u63d2\u5165\u793a\u4f8b<\/h2>\n<p>\u9664\u4e86\u67e5\u8a62\u6578\u64da\uff0cVB \u4e5f\u53ef\u4ee5\u7528\u4f86\u63d2\u5165\u6578\u64da\u3002\u4ee5\u4e0b\u662f\u4e00\u500b\u63d2\u5165\u6578\u64da\u7684\u793a\u4f8b\uff1a<\/p>\n<pre><code>\nDim insertCmd As New OleDbCommand(\"INSERT INTO your_table (column1, column2) VALUES (@value1, @value2)\", conn)\ninsertCmd.Parameters.AddWithValue(\"@value1\", \"example1\")\ninsertCmd.Parameters.AddWithValue(\"@value2\", \"example2\")\n\nTry\n    conn.Open()\n    insertCmd.ExecuteNonQuery()\n    MessageBox.Show(\"\u6578\u64da\u63d2\u5165\u6210\u529f\uff01\")\nCatch ex As Exception\n    MessageBox.Show(\"\u63d2\u5165\u5931\u6557\uff1a\" &amp; ex.Message)\nFinally\n    conn.Close()\nEnd Try\n<\/code><\/pre>\n<p>\u5728\u9019\u6bb5\u4ee3\u78bc\u4e2d\uff0c\u6211\u5011\u4f7f\u7528\u53c3\u6578\u5316\u67e5\u8a62\u4f86\u9632\u6b62 SQL \u6ce8\u5165\u653b\u64ca\uff0c\u4e26\u78ba\u4fdd\u6578\u64da\u7684\u5b89\u5168\u6027\u3002<\/p>\n<h2 id=\"%e7%b8%bd%e7%b5%90-FKYQGTHuSU\">\u7e3d\u7d50<\/h2>\n<p>\u901a\u904e\u4ee5\u4e0a\u7684\u5be6\u4f8b\u6e90\u78bc\uff0c\u6211\u5011\u53ef\u4ee5\u770b\u5230 VB \u6578\u64da\u5eab\u7de8\u7a0b\u7684\u57fa\u672c\u64cd\u4f5c\uff0c\u5305\u62ec\u9023\u63a5\u6578\u64da\u5eab\u3001\u67e5\u8a62\u6578\u64da\u548c\u63d2\u5165\u6578\u64da\u7b49\u3002\u9019\u4e9b\u57fa\u672c\u64cd\u4f5c\u70ba\u958b\u767c\u66f4\u8907\u96dc\u7684\u6578\u64da\u5eab\u61c9\u7528\u7a0b\u5e8f\u5960\u5b9a\u4e86\u57fa\u790e\u3002<\/p>\n<p>\u5982\u679c\u60a8\u5c0d\u65bc\u5982\u4f55\u5728\u96f2\u7aef\u74b0\u5883\u4e2d\u90e8\u7f72\u9019\u4e9b VB \u6578\u64da\u5eab\u61c9\u7528\u7a0b\u5e8f\u611f\u8208\u8da3\uff0c\u60a8\u53ef\u4ee5\u8003\u616e\u4f7f\u7528 <a href=\"https:\/\/server.hk\">\u9999\u6e2fVPS<\/a> \u670d\u52d9\uff0c\u9019\u5c07\u70ba\u60a8\u7684\u61c9\u7528\u7a0b\u5e8f\u63d0\u4f9b\u7a69\u5b9a\u7684\u904b\u884c\u74b0\u5883\u548c\u9748\u6d3b\u7684\u8cc7\u6e90\u914d\u7f6e\u3002<\/p>\n","protected":false},"excerpt":{"rendered":"<p>\u63a2\u7d22VB\u6578\u64da\u5eab\u7de8\u7a0b\u7684\u5be6\u4f8b\u6e90\u78bc\uff0c\u6df1\u5165\u5206\u6790\u5176\u7d50\u69cb\u8207\u529f\u80fd\uff0c\u63d0\u5347\u60a8\u7684\u7de8\u7a0b\u6280\u80fd\u8207\u5be6\u8e10\u7d93\u9a57\u3002<\/p>\n","protected":false},"author":0,"featured_media":0,"comment_status":"closed","ping_status":"","sticky":false,"template":"","format":"standard","meta":{"footnotes":""},"categories":[101],"tags":[],"class_list":["post-144990","post","type-post","status-publish","format-standard","hentry","category-database"],"_links":{"self":[{"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/posts\/144990","targetHints":{"allow":["GET"]}}],"collection":[{"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/posts"}],"about":[{"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/types\/post"}],"replies":[{"embeddable":true,"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/comments?post=144990"}],"version-history":[{"count":1,"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/posts\/144990\/revisions"}],"predecessor-version":[{"id":144997,"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/posts\/144990\/revisions\/144997"}],"wp:attachment":[{"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/media?parent=144990"}],"wp:term":[{"taxonomy":"category","embeddable":true,"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/categories?post=144990"},{"taxonomy":"post_tag","embeddable":true,"href":"https:\/\/server.hk\/cnblog\/wp-json\/wp\/v2\/tags?post=144990"}],"curies":[{"name":"wp","href":"https:\/\/api.w.org\/{rel}","templated":true}]}}