ACCESS自动编号如何恢复从1开始的方法(1)
重置单个表中的“自动编号”字段:要重置“自动编号”字段值,可以使用方法 1 或方法 2。
方法 1
可以重置“自动编号”字段值,使其与表中的一个字段相对应。为此,请按照下列步骤 *** 作:
1. 从主表中删除“自动编号”字段。记下“自动编号”字段名称。
2. 在左窗格中单击“查询”。在右窗格中双击“在设计视图中创建查询”。
3. 在“显示表”对话框中,选择主表。单击“添加”,然后单击“关闭”。
4. 在主表的表视图中双击所需字段,以选择该字段。
5. 选择需要的“排序”顺序。
6. 在“查询”菜单中,单击“生成表查询”。在“表名称”文本框中键入新的表名称,然后单击“确定”。
7. 在“查询”菜单上,单击“运行”。
8. 将显示带有以下文本的对话框:“您正准备向新表粘贴 # 行。”单击“是”以插入行。
9. 在“文件”菜单上,单击“关闭”。单击“否”关闭“生成表查询”窗口。
10. 在左窗格中单击“表”。右键单击新表,然后单击“设计视图”。
11. 在表的“设计”视图中,添加与步骤 1 中删除的字段名称相同的“自动编号”字段。将此“自动编号”字段添加到新表中,然后保存该表。
12. 关闭“设计”视图窗口。
13. 重命名主表。将新表名称重命名为主表名称。
方法 2
也可以使用方法 2 来重置“自动编号”字段值,请按照下列步骤 *** 作:
1. 从主表中删除“自动编号”字段。记下“自动编号”字段名称。
2. 复制主表的结构,然后创建新表。
3. 在左窗格中单击“查询”。在右窗格中单击“在设计视图中创建查询”。
4. 在“显示表”对话框中,选择主表。单击“添加”,然后单击“关闭”。
5. 要选择字段,请双击需要的字段。在主表的“表”视图中对除了“自动编号”字段外的所有字段进行此 *** 作。
6. 在“查询”菜单上,单击“追加查询”。这将更改查询类型。
7. 从“表名称”列表中,选择您在步骤 1 中创建的新表。单击“确定”。
8. 在“查询”菜单上,单击“运行”。
9. 将显示带有以下文本的对话框:“您正准备追加 # 行。”单击“是”将行追加到新表中。
10. 在“文件”菜单上,单击“关闭”。单击“否”关闭“追加查询”窗口。
11. 在左窗格中单击“表”。右键单击新表,然后单击“设计视图”。
12. 在表的“设计”视图中,添加与步骤 1 中删除的字段名称相同的“自动编号”字段。将此“自动编号”字段添加到新表中,然后保存该表。
13. 关闭“设计”视图窗口。
14. 重命名主表。将新表名称重命名为主表名称。
重置带引用表的表中的“自动编号”字段
下面的步骤说明如何为具有引用表的表重置“自动编号”字段。如果有多个引用表,则必须对每个引用表执行下列步骤。
1. 删除表之间的关系。
2. 将主表的“自动编号”字段设为数字数据类型。删除主键。
3. 在主表中创建数据类型为“自动编号”的新字段。保存该表。
4. 在引用表中创建数据类型为数字的新字段。保存该表。
5. 要创建更新查询,以将引用表中的新字段更新为主表中的新“自动编号”字段,请按照下列步骤 *** 作:
a. 在左窗格中单击“查询”。在右窗格中单击“在设计视图中创建查询”。这将创建新查询。
b. 在“显示表”对话框中,选择主表和引用表。单击“添加”来添加主表和引用表。单击“关闭”。
c. 单击主表中以前链接到引用表的字段。使用拖放功能将该字段放到引用表中以前链接的字段上。这样将在这两个表之间创建基于原始链接字段的联接。
d. 在“查询”菜单上,单击“更新查询”。
e. 双击引用表中的新字段,将其添加到字段列表中。
f. 在“更新到”字段中,键入 [主表名].[新自动编号字段],以更新引用表中的新字段值。
g. 在“查询”菜单上,单击“运行”。
h. 将显示带有以下文本的对话框:“您正准备更新 # 行。”单击“是”将行追加到新表中。
i. 在“文件”菜单上,单击“关闭”。单击“否”关闭“更新查询”窗口。
6. 从主表和引用表中删除原始链接字段。
7. 将新“自动编号”字段重命名为原始名称。
8. 重新创建主键以及表之间的关系。
此过程重置“自动编号”字段,然后用正确的键值更新引用表。
ACCESS自动编号从1开始-如何让access自动编号重新从1开始排序的方法(2)
方法一:
删个那个自动编号的字段,再建一个同样的自动编号字段即可。
方法二:
自动编号是一直增加的(每次都加1),你再增加一条记录它的编号会在前面的基础上加1(删除的也算),如果你编号为1的记录被删除了,你想再要从1开始,可以打开Access数据库,选择工具,再选择数据库实用工具,单击压缩和修复数据库,这样就OK了.
方法三:(没试过)
1、在access里新建一个查询。
2、把视图改为sql视图。
3、在里面输入
ALTER TABLE 表名 ALTER COLUMN [自动编号字段名] COUNTER (你要的初始值, 1)
例如:
ALTER TABLE [user] ALTER COLUMN [id] COUNTER (1001, 1)
4、运行后,编号就从1001开始了。
“修改”按钮的程序Private Sub cmdEdit_Click()
sql = "select * from 停时统计 where date = cdate('" &Text8.Text &"') and ycqk = '" &Combo1.Text &"'and id = '" &DataGrid1.Columns(2).CellText(DataGrid1.Bookmark) &"'"
rs.Open sql, dm, adOpenDynamic, adLockOptimistic
rs.Fields("id") = Text7.Text
rs.Fields("ycqk") = Combo1.Text
rs.Fields("date1") = Text1.Text
rs.Fields("time1") = Text2.Text
rs.Fields("date2") = Text3.Text
rs.Fields("time2") = Text4.Text
rs.Update
rs.Close
End Sub
'“删除”按钮的程序
Private Sub cmdDelete_Click()
strFCode = DataGrid1.Columns(0).CellText(DataGrid1.Bookmark)
strSCode = DataGrid1.Columns(2).CellText(DataGrid1.Bookmark)
strCCode = DataGrid1.Columns(1).CellText(DataGrid1.Bookmark)
sql = "select * from 停时统计 where date='" &strFCode &"' and id='" &strSCode &"' and ycqk='" &strCCode &"'"
rs.Open sql, dm, adOpenDynamic, adLockOptimistic
rs.Delete
rs.Update
rs.Close
End Sub
'“增加”按钮的程序
Private Sub Command1_Click()
sql = "select * from 停时统计 order by id"
rs.Open sql, dm, adOpenDynamic, adLockOptimistic
rs.AddNew
rs.Fields("date") = Date
rs.Fields("id") = Text7.Text - 1
rs.Fields("ycqk") = Combo1.Text
rs.Fields("date1") = Text1.Text
rs.Fields("time1") = Text2.Text
rs.Fields("date2") = Text3.Text
rs.Fields("time2") = Text4.Text
rs.Update
rs.Close
With Adodc1
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0Data Source=" &App.Path &"\db1.mdbPersist Security Info=False"
Adodc1.RecordSource = "select * from 停时统计 where date = cdate('" &Text8.Text &"') and ycqk = '" &Combo1.Text &"' order by id"
Adodc1.Refresh
DataGrid1.Refresh
End With
End Sub
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)