Απ: Access Autonumber Column

nikolaosk — Fri, 31 Oct 2008 00:43:40 GMT

φίλε μου σε βοήθησε αυτή η λύση?

Απ: Access Autonumber Column

nikolaosk — Mon, 27 Oct 2008 23:18:03 GMT

φίλε,

για δες αυτη τη λύση

έχεις μια απλή windows form application με ένα textbox και ένα Button

η βάση που χρησιμοποιώ είναι η Nortwind και ο πίνακας categories. όταν κάποιος πατάει το κουμπί φέρνει την Idenity column του πίνακα αυτού στο textbox

'the import statements

Imports System.Data.SqlClient

Imports System.Data

Public Class Form1

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

'change the connection string accordingly

Dim strDBConnection As String = "Data Source=FOFO-PC;Initial Catalog=Northwind;Integrated Security=True"

Dim dbConnection As SqlConnection

dbConnection = New SqlConnection(strDBConnection)

Dim strSelectSql As String = "select o.name + '.' + c.name from syscolumns c, sysobjects o where(c.status & 128 = 128) and o.id = c.id and o.name='categories' order by o.name"

dbConnection.Open()

Dim selectSqlCommand As New SqlCommand(strSelectSql, dbConnection)

Dim sqlData As New SqlDataAdapter(selectSqlCommand)

Dim dsSelectData As New DataSet()

sqlData.Fill(dsSelectData)

Dim strPrimaryKeyName As String = Convert.ToString(dsSelectData.Tables(0).Rows(0)(0))

TextBox1.Text = strPrimaryKeyName

End Sub

End Class

ελπίζω να βοηθήσει...

Access Autonumber Column

Panos Kousidis — Sun, 26 Oct 2008 20:03:33 GMT

Υπάρχει τρόπος να βρω μέσα από vb.net ποια στήλη κάποιου δεδομένου πίνακα έχει Autonumber datatype;
Όταν ο dataadapter κάνει fill ένα dataset, το property Autonumber της στήλης του πίνακα που με ενδιαφέρει είναι πάντα False

SQL Server (και άλλες databases)

Απ: Access Autonumber Column

Απ: Access Autonumber Column

Access Autonumber Column