Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/15.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Sql Oracle字符串连接属性_Sql_Vb.net_Oracle - Fatal编程技术网

Sql Oracle字符串连接属性

Sql Oracle字符串连接属性,sql,vb.net,oracle,Sql,Vb.net,Oracle,我一直在网站上查找字符串连接及其参数。我已经用这段代码实现了连接,但我不知道如何将参数与用户输入连接起来 这是我的密码: Imports System Imports System.Data Imports System.Data.OracleClient Module OracleConnect Sub Main() Dim connString As String = "server = o92; uid = java2s;password = password;"

我一直在网站上查找字符串连接及其参数。我已经用这段代码实现了连接,但我不知道如何将参数与用户输入连接起来

这是我的密码:

Imports System
Imports System.Data
Imports System.Data.OracleClient

Module OracleConnect

   Sub Main()
      Dim connString As String = "server = o92; uid = java2s;password = password;"

      'Create connection
      Dim conn As New OracleConnection(connString)

      Try
         conn.Open()
         Console.WriteLine("Connection Opened")

         Console.WriteLine("Connection Properties")
         Console.WriteLine("- ConnectionString : {0}", conn.ConnectionString)
         Console.WriteLine("- ServerVersion : {0}", conn.ServerVersion)
         Console.WriteLine("- State : {0}", conn.State)

      Catch ex As OracleException
         Console.WriteLine("Error: " & ex.ToString())
      Finally
         ' Close Connection
         conn.Close()
         Console.WriteLine("Connection Closed")

      End Try

   End Sub
重点是我想用用户输入参数更改连接字符串,这样它将是一个文本框,服务器和密码以及侦听器将跟踪用户的输入


非常感谢

看起来您启动了一个控制台项目,而不是winform项目。后者允许您将文本框和按钮等控件拖放到表单上,以便用户能够填写连接字符串字段

然后可以像这样连接连接字符串:

Dim connString As String = "server = " & Textbox1.Text &"; uid = " & Textbox2.Text &";password = " & Textbox3.Text &";"

或者,您可以使用console应用程序,并使用命令行参数启动它。使用。后者允许您将文本框和按钮等控件拖放到表单上,以便用户能够填写连接字符串字段

然后可以像这样连接连接字符串:

Dim connString As String = "server = " & Textbox1.Text &"; uid = " & Textbox2.Text &";password = " & Textbox3.Text &";"

或者您可以使用console应用程序,并使用命令行参数启动它。您可以尝试这样的功能,传入文本框的值

Public Function connectionString(server As String, uid As String, password As String) As String
    Dim tmpServer(2) As String

     tmpServer(0) = "server = " & server
    tmpServer(1) = "uid = " & uid
    tmpServer(2) = "password = " & password

    Return String.Join("; ", tmpServer) & ";"
End Function
用法将是

Dim conn As New OracleConnection(connectionString(TextBox1.Text, TextBox2.Text, TextBox3.Text))

您可以尝试这样的函数,传入文本框的值

Public Function connectionString(server As String, uid As String, password As String) As String
    Dim tmpServer(2) As String

     tmpServer(0) = "server = " & server
    tmpServer(1) = "uid = " & uid
    tmpServer(2) = "password = " & password

    Return String.Join("; ", tmpServer) & ";"
End Function
用法将是

Dim conn As New OracleConnection(connectionString(TextBox1.Text, TextBox2.Text, TextBox3.Text))

谢谢你的快速回答。真的,我在找汉克斯的快速答案。真的是我要找的吗