Citat:
vladdy: Ne valja ti taj back-slash. To ce da ode na network i trazi putanju koja sleda UNC i nema sanse da ti to radi.
Jel mozes da ostavis kod kao i u kom se direktoriju nalazi tvoja databaza u odnosu na stranicu.
Kod izgleda otprilike ovako, bez detaljisanja:
Public Function Is_Access() As Boolean
Dim connlocalDb As New OleDb.OleDbConnection
Is_Access = False
Try
connlocalDb = New OleDb.OleDbConnection
connlocalDb.ConnectionString = "Data Source=\\
www.mojsajt.com\Data\baza.mdb;Provider=Microsoft.Jet.OLEDB.4.0;"
connlocalDb.Open()
Dim ds As New DataSet
Dim sSql As String = "SELECT * FROM .... "
Dim da As New OleDb.OleDbDataAdapter
Dim cmd As New OleDb.OleDbCommand
cmd.Connection = connlocalDb
cmd.CommandType = CommandType.Text
cmd.CommandText = sSql
da.SelectCommand = cmd
da.Fill(ds, "TBL")
Is_Access = (ds.Tables("TBL").Rows.Count > 0)
cmd.Dispose()
cmd = Nothing
da.Dispose()
da = Nothing
ds.Dispose()
ds = Nothing
Catch ex As Exception
MsgBox(ex.Message)
Is_Access = False
Finally
connlocalDb.Close()
connlocalDb.Dispose()
End Try
End Function
Što se tiče foldera: u prvom nivou ispod www je folder Data. U njemu je baza baza.mdb
Ako je jasnije : iz Nortona preko FTP vidi se 0:/www/data
Tačno je da ne radi već javlja neku poruku o lošoj putanji.
Nažalost, prvi put radim sa Access-om na netu pa se baš ne snalazim.
Mnogo mi je lakše sa SqlServerom.