c#到vb使用同步框架奇怪错误
我遵循了微软的同步框架演练,该演练是用C#编写的。我想把它翻译成VB。我已经尽可能地简化了代码。这两个代码都编译得很好。它们在同一解决方案中的两个项目下运行。C#运行良好,但VB给出以下错误 System.Data.SqlClient.SqlException未处理 Message=建立与SQL Server的连接时发生与网络相关或特定于实例的错误。找不到服务器或无法访问服务器。验证实例名称是否正确,以及SQL Server是否配置为允许远程连接。(提供程序:SQL网络接口,错误:50-发生本地数据库运行时错误。指定的LocalDB实例名称无效。 ) 搜索此错误会导致连接字符串中出现错误,但正如您所看到的,两个连接字符串是相同的。唯一的区别是一个在C#中运行,另一个在VB中运行 C#代码是: VB代码是:c#到vb使用同步框架奇怪错误,c#,sql-server,vb.net,microsoft-sync-framework,localdb,C#,Sql Server,Vb.net,Microsoft Sync Framework,Localdb,我遵循了微软的同步框架演练,该演练是用C#编写的。我想把它翻译成VB。我已经尽可能地简化了代码。这两个代码都编译得很好。它们在同一解决方案中的两个项目下运行。C#运行良好,但VB给出以下错误 System.Data.SqlClient.SqlException未处理 Message=建立与SQL Server的连接时发生与网络相关或特定于实例的错误。找不到服务器或无法访问服务器。验证实例名称是否正确,以及SQL Server是否配置为允许远程连接。(提供程序:SQL网络接口,错误:50-发生本地
Imports System.Data.SqlClient
Imports Microsoft.Synchronization
Imports Microsoft.Synchronization.Data
Imports Microsoft.Synchronization.Data.SqlServer
Module Module1
Sub Main()
Dim clientConn As SqlConnection = New SqlConnection("Data Source=(LocalDB)\\v11.0;AttachDbFilename=c:\\Database\\SyncExpressDB.mdf;Integrated Security=True")
Dim serverConn As SqlConnection = New SqlConnection("Data Source=Toshiba\\SQLEXPRESST;Initial Catalog=SyncDB;User ID=sa;Password=XXX")
Dim syncOrchestrator As SyncOrchestrator = New SyncOrchestrator
syncOrchestrator.LocalProvider = New SqlSyncProvider("ProductsScope", clientConn)
syncOrchestrator.RemoteProvider = New SqlSyncProvider("ProductsScope", serverConn)
syncOrchestrator.Direction = SyncDirectionOrder.UploadAndDownload
Dim syncStats As SyncOperationStatistics = syncOrchestrator.Synchronize()
Console.WriteLine("Total Changes Downloaded: " + syncStats.DownloadChangesTotal)
End Sub
End Module
错误发生在
Dim syncStats As SyncOperationStatistics = syncOrchestrator.Synchronize()
C#代码在连接字符串中包含两个反斜杠,因为需要用字符串文字(或使用逐字字符串文字)转义它们。在VB中,这是不需要的,因为\
不是转义字符(据我所知),所以不应该将它们加倍:
Dim clientConn As SqlConnection = New SqlConnection("Data Source=(LocalDB)\v11.0;AttachDbFilename=c:\Database\SyncExpressDB.mdf;Integrated Security=True")
Dim serverConn As SqlConnection = New SqlConnection("Data Source=Toshiba\SQLEXPRESST;Initial Catalog=SyncDB;User ID=sa;Password=XXX")
错过了那个。谢谢
Dim clientConn As SqlConnection = New SqlConnection("Data Source=(LocalDB)\v11.0;AttachDbFilename=c:\Database\SyncExpressDB.mdf;Integrated Security=True")
Dim serverConn As SqlConnection = New SqlConnection("Data Source=Toshiba\SQLEXPRESST;Initial Catalog=SyncDB;User ID=sa;Password=XXX")