用vs2010 *** 作c#修改数据库在listview中怎样做?

用vs2010 *** 作c#修改数据库在listview中怎样做?,第1张

//拖动一个listView1到窗体上

private void Form1_Load(object sender, EventArgs e)

{

listView1.View = View.Details

listView1.Dock = DockStyle.Fill

listView1.Columns.Add("col1")

listView1.Columns.Add("col2")

listView1.Columns.Add("col3")

}

//在属性窗口双击产生事件代码

private void listView1_SizeChanged(object sender, EventArgs e)

{

int w = (listView1.Width-10) / 3//减10是考虑到边框和滚动条的宽度

listView1.Columns[0].Width = w

listView1.Columns[1].Width = w

listView1.Columns[2].Width = w

}

那就是VS的版本太低,SP1补丁打了没

看下VS2008 SP1的自述文件如果是win7也有兼容性问题,如果是速成版也是原因之一,原因比较复杂,不行只能重装了,是按SQL2008,SQL2008SP1,vs2008,vs2008SP1的顺序安装,其中不装默认的sql2005 express,最后装office2007

VS2008SP1地址,下边相关资源里有SP1的自述文件,里边有较详细的解决办法,要自己摸索了

http://www.microsoft.com/downloads/details.aspx?displaylang=zh-cn&FamilyID=fbee1648-7106-44a7-9649-6d9f6d58056e

Dim link1 As New ADODB.Connection

Dim rs As New ADODB.Recordset

Dim pubdatapath As String

Sub opendatabase(datapath As String)'打开数据库函数

If link1.State = 1 Then '如果以连接过,则关闭,初始化下次事务

link1.Close: list2.ListItems.Clear: list2.ColumnHeaders.Clear: c.Clear: list1.ListItems.Clear

End If

link1.ConnectionString = "Provider=microsoft.jet.oledb.4.0data source=" &datapath

link1.Open

pubdatapath = datapath

Set biaoming = link1.OpenSchema(adSchemaColumns)'创建数据库记录集

tablename = ""

Do Until biaoming.EOF

If biaoming("table_name") <>tablename Then '列出所有表

tablename = biaoming("table_name")

list1.ListItems.Add , , tablename

End If

biaoming.MoveNext

Loop

Set biaoming = Nothing

menu1.Enabled = True

list1_MouseUp 1, 0, 10, 10

End Sub

Private Sub Command1_Click() '打开数据库

d.DialogTitle = "打开一个数据库文件进行浏览"

d.InitDir = App.Path

d.FileName = ""

d.Filter = "Access数据库(mdb后缀,推荐格式)|*.mdb"

d.ShowOpen

If d.FileName = "" Then Exit Sub

opendatabase d.FileName

End Sub


欢迎分享,转载请注明来源:内存溢出

原文地址: https://outofmemory.cn/sjk/9984532.html

(0)
打赏 微信扫一扫 微信扫一扫 支付宝扫一扫 支付宝扫一扫
上一篇 2023-05-04
下一篇 2023-05-04

发表评论

登录后才能评论

评论列表(0条)

保存