Как я могу вставить какой-то файл на MS SQL Server в Outlook - PullRequest
0 голосов
/ 30 апреля 2019

У меня есть соединение, и я могу вставить свой ms sql сервер.Но как я могу отправить или вставить какой-нибудь файл (например, file.rar).Что я могу использовать код или ссылку, вы можете объяснить это.Код полностью работает, но я посылаю только целое число и т. Д.

Sub DbConnection()

Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Dim rs As ADODB.Recordset


Dim Authentication,ServerName,Database,UID,PASS As String
Dim strConn As String

'Authentication type EX : Windows Aut or SQL Server AUT
Authentication = "SQLOLEDB"
'Server Name ,Usualy Computer UID, I user MS SQL Express UID\SQLEXPRESS
ServerName = "DESKTOP-asfadgda\SQLEXPRESS"
'Creating Database Name
Database = "VBADB"
'User ID
UID = "sa"
'User Pass
PASS = "123"


'Connection String - Connection Link
strConn = "Provider=" &Authentication&";Data Source="&ServerName&";Initial Catalog="&Database&";User ID="&UID&";Password="&PASS&";"



cn.Open [strConn]

Dim strFirstName As String
Dim strSecondName As String

strFirstName = Trim(InputBox("Enter first name:"))
strSecondName = Trim(InputBox("Enter Surname:"))

Set rs = cn.Execute("INSERT INTO dbo.Table_2 (name, surname) VALUES (" & strFirstName & "," & strSecondName & ")")


cn.Close
Set cn = Nothing
MsgBox ("Congratulations")




End Sub
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...