MS Access'te, seçili bir sorgunun döndürülen sonucuna yeni bir sütun eklemek istiyorum. Yeni sütun, her satır için aynı değere sahiptir.Seçme sorgusunda yeni sütun oluşturma
A B C
----------
a1 b1 c
a2 b2 c
a3 b3 c
MS Access'te, seçili bir sorgunun döndürülen sonucuna yeni bir sütun eklemek istiyorum. Yeni sütun, her satır için aynı değere sahiptir.Seçme sorgusunda yeni sütun oluşturma
A B C
----------
a1 b1 c
a2 b2 c
a3 b3 c
select A, B, 'c' as C
from MyTable
Bu örneğin o sütunla birlikte ne yapmak istediğini bağlıdır: Örneğin, benim seçme döner sütunlar A, B ve C seçme sorgusu tarafından oluşturulan yeni sütun olmak istiyorum Burada istemci tarafında güncellenebilen bir kayıt kümesine yeni bir sütun ekleme bir örnek:
Sub MSDataShape_AddNewCol()
Dim rs As ADODB.Recordset
Set rs = CreateObject("ADODB.Recordset")
With rs
.ActiveConnection = _
"Provider=MSDataShape;" & _
"Data Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\Tempo\New_Jet_DB.mdb"
.Source = _
"SHAPE {" & _
" SELECT ExistingField" & _
" FROM ExistingTable" & _
" ORDER BY ExistingField" & _
"} APPEND NEW adNumeric(5, 4) AS NewField"
.LockType = adLockBatchOptimistic
.Open
Dim i As Long
For i = 0 To .RecordCount - 1
.Fields("NewField").Value = Round(.Fields("ExistingField").Value, 4)
.MoveNext
Next
rs.Save "C:\rs.xml", adPersistXML
End With
End Sub
SEÇ alan1, field2 Bu bir sütun katacak TABLE1 GELEN Newfield OLARAK 'örnek' "olarak adlandırılan newfield "çıktıya ve değerine her zaman" örnek "olacaktır.