VB.NET連接sap VBNET教程

vb.net的數(shù)據(jù)庫連接

1·綁定數(shù)據(jù)源來進行連接

讓客戶滿意是我們工作的目標，不斷超越客戶的期望值來自于我們對這個行業(yè)的熱愛。我們立志把好的技術(shù)通過有效、簡單的方式提供給客戶，將通過不懈努力成為客戶在信息化領(lǐng)域值得信任、有價值的長期合作伙伴，公司提供的服務(wù)項目有：域名申請、網(wǎng)絡(luò)空間、營銷軟件、網(wǎng)站建設(shè)、勐海網(wǎng)站維護、網(wǎng)站推廣。

2.用代碼連接

先到數(shù)據(jù)庫建立一個數(shù)據(jù)庫和相應(yīng)的表

連接數(shù)據(jù)庫的代碼：

Dim str As String = "Data Source=服務(wù)器名;Initial Catalog=數(shù)據(jù)庫名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

try

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

Return True

Catch ex As Exception

MsgBox(ex.ToString)

Return False

End Try

登錄代碼：Dim str As String = "Data Source=服務(wù)器名;Initial Catalog=數(shù)據(jù)庫名;Persist Security Info=True;User ID=;Password="

dim conn As SqlClient.SqlConnection

conn = New SqlClient.SqlConnection

conn.ConnectionString = str

conn.Open()

sqlstr = "Select * From Amd Where AmdName='" TextBox1.Text "' And AmdPwd = '" TextBox2.Text "'"

Dim sqlcmd As SqlClient.SqlCommand = New SqlClient.SqlCommand(sqlstr, conn)

Dim dr As SqlClient.SqlDataReader

dr = sqlcmd.ExecuteReader

If dr.Read = True Then '判斷一條記錄為真

kf.Show() '顯示下個窗體

Me.Hide() ’隱藏當前窗體

Else

MessageBox.Show("輸入信息有誤！", "提示")

TextBox1.Text = ""

TextBox2.Text = ""

End If

如何使用VS003 +SAP.net Connector 調(diào)用RFC函數(shù)

無具體的錯！我使用的是VB.NET，然后我在頁面放了兩個文本框，一個是用來輸入SO NUMBER，一個是輸入日期來查詢。但是這兩個參數(shù)無法傳到SAP系統(tǒng)當中。導致無法查詢結(jié)果，返回值為0.不知版主是可以給一個具體的例子呢，感謝??！

VB.NET連SQL時出錯！sa登錄失敗，未與信任的SQL Server相關(guān)聯(lián)是怎么回事？

1.先用WINDOWS方式登錄進去~

2.安全性--》登錄名--》sa---右鍵屬性--》把密碼改成sa，把強制密碼策略前的√去掉~先別點確定~點左邊的“狀態(tài)”將登錄

改為啟用，確定。

3.在對象資源管理器里面的最根部的目錄（就是.\SQLEXPRESS(.....)那）右鍵屬性，安全性--》服務(wù)器身份驗證選擇SQL

Sever和WINDOWS身份驗證模式。確定~

4.在開始程序中選擇SQL

2005-配置工具-》外圍用用配置器，點開下面的服務(wù)和連接的外圍應(yīng)用配置器，選擇左邊的

遠程連接，選擇本地連接和遠程連接

以及同時使用兩項。確定，OK啦！

5.如果還不行，重啟下電腦~

6.連接字符串這樣寫static

string

connString

"Data

Source=.\\SQLEXPRESS;Initial

Catalog=meifa;user

ID=sa;Pwd=sa";

注意兩個反斜杠哦！

終于寫完了好累啊

昨天我就是這樣連接上的，希望對你有用~~~~

vs.net 2005 /2008 如何連接調(diào)用sap的rfc，需要全部的配置過程和代碼。

using SAPFunctionsOCX;

using SAPLogonCtrl;

using System.Data;

using SAPTableFactoryCtrl;

using Microsoft.Adapter.SAP;

using VbSapConnect;

public partial class MainWindow : Window

{

public MainWindow()

{

InitializeComponent();

}

public void button1_Click(object sender, RoutedEventArgs e)

{

SAPLogonCtrl.SAPLogonControlClass sapLogon = new SAPLogonCtrl.SAPLogonControlClass();

sapLogon.User = textBox2.Text.Trim();

sapLogon.Password = textBox3.Text.Trim();

sapLogon.Client = textBox1.Text.Trim();

sapLogon.ApplicationServer = textBox4.Text.Trim();

sapLogon.Language = textBox5.Text.Trim();

sapLogon.SystemNumber = int.Parse(textBox6.Text.Trim());

SAPLogonCtrl.Connection sapConn = (SAPLogonCtrl.Connection)sapLogon.NewConnection();

if (!sapConn.Logon(0, true))

{

this.label1.Content = "連接失敗";

}

else if (sapConn.Logon(0, true))

{

this.label1.Content = "連接成功";

SAPFunctionsOCX.SAPFunctionsClass func = new SAPFunctionsOCX.SAPFunctionsClass();//創(chuàng)建SAPFunctionsOCX.SAPFunctionsClass的實例func ，并設(shè)置其需要使用的Connection

func.Connection = sapConn;

SAPFunctionsOCX.IFunction ifunc = (SAPFunctionsOCX.IFunction)func.Add("BAPI_SALESORDER_CREATEFROMDAT2");//使用func的Add方法添加需要調(diào)用的function module的名稱

SAPFunctionsOCX.IParameter salesdocumentin = (SAPFunctionsOCX.IParameter)ifunc.get_Exports("SALESDOCUMENTIN");//使用ifunc的get_Exports方法獲取function module中的輸入?yún)?shù)

salesdocumentin.Value = textBox7.Text.Trim();

SAPFunctionsOCX.IStructure order_header_in = (SAPFunctionsOCX.IStructure)ifunc.get_Exports("ORDER_HEADER_IN");

order_header_in.set_Value("DOC_TYPE", textBox8.Text.Trim()); //銷售憑證類型

order_header_in.set_Value("SALES_ORG", textBox9.Text.Trim()); //銷售機構(gòu)

order_header_in.set_Value("DISTR_CHAN", textBox10.Text.Trim()); //分銷渠道

order_header_in.set_Value("DIVISION", textBox11.Text.Trim()); //生產(chǎn)線

order_header_in.set_Value("SALES_GRP", textBox12.Text.Trim()); //銷售組

order_header_in.set_Value("SALES_OFF", textBox13.Text.Trim()); //銷售辦事處

order_header_in.set_Value("PURCH_NO_C", textBox15.Text.Trim()); //客戶采購訂單編號

order_header_in.set_Value("CUST_GRP1", textBox16.Text.Trim()); //客戶組 1

order_header_in.set_Value("ORD_REASON", textBox17.Text.Trim()); //訂購原因( 業(yè)務(wù)原因 )