Подключение к базе данных VB.NET Pocket PC - PullRequest
0 голосов
/ 18 июля 2009

Я создал базу данных, используя SQlServer CE с именем db.sdf, используя следующий код.

Dim connStr As String = "Data Source =\temp\emp.sdf;"
Try
            'creating database
            Dim engine As SqlCeEngine
            engine = New SqlCeEngine(connStr)
            engine.CreateDatabase()
            engine.Dispose()

            'creating table
            Dim cn As New SqlCeConnection(connStr)
            Dim sql As String
            sql = "CREATE TABLE login "
            sql &= "("
            sql &= "    username   nvarchar(20) PRIMARY KEY,"
            sql &= "    password   nvarchar(20)"
            sql &= ")"
            Dim cmd As New SqlCeCommand(sql, cn)
            cmd.Connection.Open()
            cmd.ExecuteNonQuery()
            cmd.Connection.Close()
            cmd.Dispose()
            cn.Dispose()

            MessageBox.Show("Succesfully created")
        Catch ex As Exception
            MessageBox.Show(ex.Message)
        End Try

Но я не знаю, где хранится этот файл emp.sdf и как его просмотреть. Я только начал работать над приложением VB.NET Pocket PC сегодня, и я очень сбит с толку, потому что мой код подключения VB.NET не работает также с приложением Pocket PC, поэтому, пожалуйста, помогите мне решить эту проблему. Пожалуйста, любой учебник, который может мне помочь. Спасибо

Ответы [ 2 ]

1 голос
/ 21 января 2012
Imports System.Data.SqlClient
Public Class Form1

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim connetionString As String
        Dim cnn As SqlConnection

        connetionString = "Data Source=database server name;Initial Catalog=database name"
        cnn = New SqlConnection(connection string)
        Try
            cnn.Open()

            MsgBox("Connection Open ! ")
            cnn.Close()
        Catch ex As Exception
            MsgBox("Can not open connection ! ")


        End Try
    End Sub
End Class
0 голосов
/ 10 августа 2009

Вы указали имя базы данных в строке подключения при создании базы данных ...

Dim connStr As String = "Data Source =\temp\emp.sdf;"

... поэтому вы должны найти папку \ temp в папке \ My Device, в которой находится файл emp.sdf.

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