使用Excel VBA通过ADODB

-1

更新SQL Server中的数据在Excel Sheet1中，数据从SQL Server的拉升：使用Excel VBA通过ADODB

code Name 
1  ALI 
2  SALEM

我想更新数据使用VBA不是从一个完整的SQL查询更换名称ALI到Ahmed

有没有办法做到这一点？ Excel是否为我提供了一种在不发送SQL查询的情况下进行更新的方法？

一些信息：

**TABEL Name** = Tb1 
**colmun1** = code(in excel) = Emp_code (sql) 
**colmun2** = Name(in excel) = E_name (sql)

服务器名称：HHsqlexpress

来源

2017-02-11 ALDHEEB

这个问题ISN不太清楚。也许你可以重写我们，并告诉我们数据当前存储在哪里，你想如何改变它，以及你遇到了什么具体问题。 –

数据存储在SQL >>我需要更新或从数据库插入数据excel – ALDHEEB

你在用什么？ ODBC？ ADODB？ OLEDB？ –

我发现通过ADODB代码这个VBA >>>如果有任何修改或添加

Private Sub UpdateSQLData() 
On Error GoTo err 
Dim cn As New ADODB.Connection 
Dim rs As New ADODB.Recordset 
Dim sql_string As String 
Dim strconn As String 

DataBaseName = "----" 
ServerName = "196.1.1.1/SSDDSDS" 
UserId = "ADMIN" 
Password = "123" 

strconn = "Provider=SQLOLEDB.1;Password=" & Password & ";User ID=" & UserId & ";Initial Catalog=" & DataBaseName & ";Data Source=" & ServerName 
sql_string = "update transactions set CustomerID='2' where amount =1000 " 
cn.Open strconn 
rs.Open sql_string, cn 


Set rs = Nothing 
cn.Close 

Exit Sub 
err: 
MsgBox err.Description 
End Sub

来源

2017-02-12 12:30:48 ALDHEEB

使用Excel VBA通​​过ADODB

回答

相关问题

使用Excel VBA通过ADODB