.aspx.vb code syntax

  • Thread starter Thread starter slinky
  • Start date Start date
S

slinky

I'm making a OLE DB connection in code and was wondering if anyone
could identify what the syntax errors would be in this just as it is
pasted (I tried putting & _ at the end of the first line and that
only brought up other errors):

New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=" & Server.MapPath(~/App_Data/Lowes.mdb) & ";" & _
"Initial Catalog=Assets;Integrated Security=SSPI")

Thanks!!
 
I looked on connectionstrings.com but it did not have specifics for
what could be wrong with the syntax... thanks though
 
I just did that with this line:

New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
Server.MapPath(~/App_Data/Lowes.mdb) " &";""Initial
Catalog=Assets;Integrated Security=SSPI")

I used no continuity characters and the line showed no errors, except
one - it noted the ~ symbol as being not valid, but then errors showed
up in other unexpected places like: 'cnn' is not declared... when my
code (in its entirety below) shows that it IS declared.
_________________________________________________________________________________

Imports System.Data
Imports System.Data.OleDb
Public Class Default5
Inherits System.Web.UI.Page
Private Sub Page_Load(ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles MyBase.Load
Dim cnn As OleDbConnection = _
New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=" & Server.MapPath(~/App_Data/Lowes.mdb) " &";""Initial
Catalog=Assets;Integrated Security=SSPI")
Dim ds As DataSet = New DataSet()
Dim da As OleDbDataAdapter = New OleDbDataAdapter()
If Not IsPostBack Then
Dim cmdSelect As OleDbCommand = _
cnn.CreateCommand()
cmdSelect.CommandType = CommandType.Text
cmdSelect.CommandText = _
"SELECT ([Asset Number], Description, [Serial Number], Mfg, AssetType,
RDCnumber) FROM Assets"
Dim cmdInsert As OleDbCommand = _
cnn.CreateCommand()
cmdInsert.CommandType = CommandType.Text
cmdInsert.CommandText = _
"INSERT INTO Assets " & _
"([Asset Number], Description, [Serial Number], Mfg, AssetType,
RDCnumber) " & _
"VALUES(@AssetNumber, @Description, @Serial_Number, @Mfg, @AssetType,
@RDCnumber"
cmdInsert.Parameters.Add("@txtAsset_Number",
OleDbType.Double, 12, "[Asset Number]")
cmdInsert.Parameters.Add("@txtDescription",
OleDbType.WChar, 40, "Description")
cmdInsert.Parameters.Add("@txtSerial_Number",
OleDbType.WChar, 30, "[Serial Number]")
cmdInsert.Parameters.Add("@txtMfg", OleDbType.WChar, 30,
"Mfg")
cmdInsert.Parameters.Add("@txtAssetType", OleDbType.WChar,
30, "AssetType")
cmdInsert.Parameters.Add("@txtRDCNumber", OleDbType.WChar,
30, "RDCnumber")
Dim SourceVersion As DataRowVersion
SourceVersion = DataRowVersion.Original
da.SelectCommand = cmdSelect
da.InsertCommand = cmdInsert
da.Fill(ds, "Assets")
End If
End Sub
Private Sub btnAdd_Click( _
ByVal sender As System.Object, _
ByVal e As System.EventArgs) Handles btnAdd.Click
Dim cnn As OleDbConnection = _
New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=" & Server.MapPath(~/App_Data/Lowes.mdb) " &";""Initial
Catalog=Assets;Integrated Security=SSPI")
Dim ds As DataSet = New DataSet()
Dim da As OleDbDataAdapter = New OleDbDataAdapter()
Dim dr As DataRow = ds.Tables("Assets").NewRow()
dr(0) = txtAsset_Number.Text
dr(1) = txtDescription.Text
dr(2) = txtSerial_Number.Text
dr(3) = txtMfg.Text
dr(4) = txtAssetType.Text
dr(5) = txtRDCnumber.Text
ds.Tables("Assets").Rows.Add(dr)
da.Update(ds, "Assets")
End Sub
End Class
______________________________________________________________________________________________________
 
I just did that with this line:

New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
Server.MapPath(~/App_Data/Lowes.mdb) " &";""Initial
Catalog=Assets;Integrated Security=SSPI")
Click to expand...

I guess

Server.MapPath("~/App_Data/Lowes.mdb")
 
I guess

Server.MapPath("~/App_Data/Lowes.mdb")
Click to expand...

and finally

New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
Server.MapPath(~/App_Data/Lowes.mdb) " &";Initial
Catalog=Assets;Integrated Security=SSPI")

you should understand that the goal of that concatenation is to have a
properly formatted string, for example:

Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\InetPub\wwwroot
\App_Data\Lowes.mdb;Initial Catalog=Assets;Integrated Security=SSPI
 
So would this work? I added a couple of continuity characters. Looks
OK but it still doesn't allow the ~ symbol AND it still says the cnn's
are not declared.

New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
_
Server.MapPath(~/App_Data/Lowes.mdb) " &";Initial & _
Catalog=Assets;Integrated Security=SSPI")
 
So would this work? I added a couple of continuity characters. Looks
OK but it still doesn't allow the ~ symbol AND it still says the cnn's
are not declared.

New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
_
Server.MapPath(~/App_Data/Lowes.mdb) " &";Initial & _
Catalog=Assets;Integrated Security=SSPI")
Click to expand...

oh, sorry a silly copy typo:

Server.MapPath("~/App_Data/Lowes.mdb")
 
OK I put this in:

New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
_
Server.MapPath("~/App_Data/Lowes.mdb") " &";Initial & _
Catalog=Assets;Integrated Security=SSPI")

But then the " &" part of the second line errors
with: "Comma, ")", or valid expression expected"

Plus any clues as to why the 'cnn' isn't recognized?
 
Instead of
New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
_
Server.MapPath("~/App_Data/Lowes.mdb") " &";Initial & _
Catalog=Assets;Integrated Security=SSPI")
Click to expand...

Try this:
New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &
_
Server.MapPath("~/App_Data/Lowes.mdb") & ";Initial " & _
"Catalog=Assets;Integrated Security=SSPI")
Click to expand...

Akin
 
Back
Top