ÔÚ²¢·¢µÄʱºò»ñÈ¡µ±Ç°²åÈëµÄID Ö§³Öaccess sql
C# code:
Select Scope_Identity()¾Í¿ÉÒÔ»ñÈ¡µ½ÁË,Òª¸úinsertÓï¾äÔÚÒ»Æð. ACCESS sql ¶¼ÊÇÒ»ÑùµÄÓÃ
//C#
string query = "Insert Into Categories (CategoryName) Values (@CategoryName);" +
"Select Scope_Identity()";
int ID;
string connect = @"Server=.\SQLExpress;AttachDbFilename=|DataDirectory|Northwind.mdf;" +
"Database=Northwind;Trusted_Connection=Yes;";
using (SqlConnection conn = new SqlConnection(connect))
{
using (SqlCommand cmd = new SqlCommand(query, conn))
{
cmd.Parameters.AddWithValue("@CategoryName", Category.Text);
conn.Open();
ID = (int)cmd.ExecuteScalar();
}
}
VB.NET code:
'VB
Dim query As String = "Insert Into Categories (CategoryName) Values (@CategoryName);" & _
"Select Scope_Identity()"
Dim ID As Integer
Dim connect As String = "Server=.\SQLExpress;AttachDbFilename=|DataDirectory|Northwind.mdf;" & _
"Database=Northwind;Trusted_Connection=Yes;"
Using conn As New SqlConnection(connect)
Using cmd As New SqlCommand(query, conn)
cmd.Parameters.AddWithValue("@CategoryName", Category.Text)
conn.Open()
ID = cmd.ExecuteScalar()
End Using
End Using
Ïà¹ØÎÊ´ð£º
IsSqlDataBase = 0 'Ö÷Êý¾Ý¿âÀàÐÍ(1=SQL£¬0=AC)
'===========================================================================
SqlDatabaseName = "ads365" 'Ö÷Êý¾Ý¿âÃû
S ......
ACCESSÊý¾Ý¿âÖÐÓÐÒ»¸ötablename±í£¬Éè¼ÆÈçÏÂ
±àºÅ,ÊéÃû,×÷Õß,³ö°æÊ±¼ä,³ö°æÉç,ISBN,Ŀ¼,¼ò½é
ÆäÖгý¡°±àºÅ¡±Îª×Ô¶¯±àºÅÍ⣬ÆäËü¶¼Îª¡°±¸×¢¡±
ÆäÖÐ"±àºÅ"άһ£¬ÔÚ¡°ISBN¡±ÖÐÓеÄΪ¿ÕÖµ£¬ ......
Òª×éºÏ4ÕűíµÄ²éѯ£¬·Ö±ðÊÇA±í£¬B±í£¬C±í£¬D±í£»
A±í
Game_id Game_Name
1 abc
B±í
Category_ID Category_Name Game_id
& ......
ÎÒÓÃODBCÌí¼ÓÁËÊý¾ÝÔ´ºÍ¿ÕµÄmdbÎļþ
ÏÖÔÚÏëÔÚmdbÎļþÖн¨±í¡£
CDatabase db;
db.Open("XX¹ÜÀíϵͳ");
db.ExecuteSQL("Create table table1(name varchar(30), type varchar(6))&q ......
ÇëÎÊÈçºÎ»ñȡָ¶¨±íµÄ×ֶθöÊý£¿
ÓеÄÊý¾Ý¿âÓÐϵͳ±í£¬¿ÉÒԲ鵽£¬²»Í¬µÄÊý¾Ý¿âÓв»Í¬·½·¨
¸øÄãÒ»¸ö¼òµ¥·½·¨£¬´Ó¼Ç¼¼¯»ñÈ¡
rs.Fields.Count
ÒýÓÃ
ÓеÄÊý¾Ý¿âÓÐϵͳ±í£¬¿ÉÒԲ鵽£¬²»Í¬µÄÊý¾Ý¿âÓ ......