قرار دادن یک عدد ثابت در یک فیلد مشخص [بایگانی]

isaac23

شنبه 15 فروردین 1394, 21:40 عصر

سلام دوستان و اساتید گرامی

سال نو مبارک ان شا الله سال خوبی داشته باشید

من می خواستم یک جدول درست کنم و یک فیلد بنام شماره داشته باشه و زمانی که این فیلد درست میشه یک عدد ثابت داخل ذخیره بشه

مثلا من یک جدول شماره فاکتور دارم زمانی این جدول ساخته میشه عدد 1 داخل فیلد Fo ثبت بشه ...
ممنون از همگی
دستور ساخت جدول من این هستش

Dim dbs09 As Database
Set dbs09 = OpenDatabase(App.Path & "\" & "Anbar.mdb")
dbs09.Execute "CREATE TABLE GKala " & "(Namek Text);"
dbs09.Close

isaac23

یک شنبه 16 فروردین 1394, 10:39 صبح

بانک اطلاعاطش هم اکسس 2003 هستش

vbnovin

یک شنبه 16 فروردین 1394, 13:50 عصر

سلام خاب که چی ... دنبال چی هستی

ahmad abdoli

یک شنبه 16 فروردین 1394, 15:33 عصر

سلام دوستان و اساتید گرامی

سال نو مبارک ان شا الله سال خوبی داشته باشید

من می خواستم یک جدول درست کنم و یک فیلد بنام شماره داشته باشه و زمانی که این فیلد درست میشه یک عدد ثابت داخل ذخیره بشه

مثلا من یک جدول شماره فاکتور دارم زمانی این جدول ساخته میشه عدد 1 داخل فیلد Fo ثبت بشه ...
ممنون از همگی
دستور ساخت جدول من این هستش

Dim dbs09 As Database
Set dbs09 = OpenDatabase(App.Path & "\" & "Anbar.mdb")
dbs09.Execute "CREATE TABLE GKala " & "(Namek Text);"
dbs09.Close

منظورتونو متوجه نمی شم بیشتر توضیح بدبد می خوایید چی کار کنید.

isaac23

دوشنبه 17 فروردین 1394, 19:43 عصر

می خوام زمانی که جدول ساخته میشه داخل یکی از فیلد هاش مقدار ثابتی از قبل تعریف بشه

مثلا یه جدول برام بسازه که از قبل داخل این فیلد FOعدد 1 نوشته شده باشه.. همین دیگه ساده تر از این بلد نیستم توضیح بدم

isaac23

چهارشنبه 19 فروردین 1394, 18:43 عصر

دوستان ممنون میشم راهنمایی کنید خیلی لازمش دارم

isaac23

جمعه 21 فروردین 1394, 09:14 صبح

دوستان من چیزی مثل این می خوام ولی نمی دونم چرا درست کار نمیکنه مشکلش رو بگید ممنون میشم ضروریه دوستان

Dim tds As Database
Dim td As DAO.TableDef
Set tds = OpenDatabase(App.Path & "\" & "foKala.mdb")
Set td = tds.TableDefs("shf")
td.Fields("Fakno").DefaultValue = ("1")
tds.Close