Sito web non funziona dopo la pubblicazione

martedì 20 aprile 2010 - 12.26

Elenco Threads

Stanze Forum

Aggiungi ai Preferiti

Cerca nel forum

darkeric Profilo | Senior Member

211 messaggi | Data Invio: mar 20 apr 2010 - 12:26

Ciao a tutti

vi scrivo per poter chiedere un consiglio per la risoluzione del mio problema

stò sviluppando un sito web con VWD 2008 utilizzando il linguaggio VB per il codice

per l'autenticazione utilizzo il database ASPNETDB.MDF mentre per tutto il resto un Database MDB

attualmente il sito funziona tutto correttamente in locale!

se invece lo pubblico (Server Aruba) in certe situazioni mi da errore non gestito

le situazioni accertate sono:

in fase di login (ASPNETDB.MDF)
in fase di inserimento prodotto nel carrello (DB.MDB)

se invece vado a filtrare la tabella catalogo del DB.MDB con la selectcommand funziona correttamente.

pensavo un problema di accesso ai DB ma se i filtri funzionano non credo sia quello.

che ne pensate?

Anonimo Profilo | Senior Member

392 messaggi | Data Invio: mer 21 apr 2010 - 11:52

Aruba non ama molto gli mdf perchè scavalcano il loro servizio sql server a pagamento, quindi penso che la causa sia quella, compra il servizio sql server su aruba, e configura il sito di conseguenza.

Gluck74 Profilo | Guru

1.359 messaggi | Data Invio: mer 21 apr 2010 - 18:09

1331_SampleWebsiteAccessProviders.z

Su aruba non si possono usare gli mdf se non a pagamento, ma solo gli mdb.
perché in inserimento ci sia un errore sul file mdb, e non in lettura, non ne ho la minima idea, ma probabilmente una query o il codice.

Se cerchi anche su questo forum, o su google, ci sono molti articoli che ti spiegano come risolvere il problema dell'autenticazione integrata utilizzando un mdb.
in pratica troverai un file mdb identico al database ASPNET.MDF per l'autenticazione, inoltre troverai una dll che non è altro che il provider di autenticazione ricompilato per usare mdb.

ah ........... aspetta un attimo....... si si si, questo allegato dovrebbe andare benissimo.

ciao

darkeric Profilo | Senior Member

211 messaggi | Data Invio: gio 22 apr 2010 - 08:13

Imports System.Data.OleDb
Imports System.Data
Imports System.Web

Partial Class Negozio
Inherits System.Web.UI.Page

Protected Sub DropDownList1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DropDownList1.SelectedIndexChanged
AccessDataSource1.SelectCommand = ("select * from tabella_catalogo where catID = '" + DropDownList1.SelectedValue + "'")
AccessDataSource3.SelectCommand = ("select * from tabella_gruppi where catID = '" + DropDownList1.SelectedValue + "'")
End Sub

Protected Sub DropDownList2_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles DropDownList2.SelectedIndexChanged
AccessDataSource1.SelectCommand = ("select * from tabella_catalogo where gruppoID = '" + DropDownList2.SelectedValue + "'")
End Sub

Protected Sub Button1_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button1.Click
AccessDataSource1.SelectCommand = ("select * from tabella_catalogo where descrizione like '%" + TextBox1.Text + "%'")

End Sub

Protected Sub Button2_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles Button2.Click
AccessDataSource1.SelectCommand = ("select * from tabella_catalogo")
DropDownList1.SelectedIndex = 0
DropDownList2.SelectedIndex = 0
End Sub

Protected Sub GridView1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView1.Load
' GridView1.AutoGenerateColumns = False
' If Not My.User.IsAuthenticated Then
' GridView1.Columns(10).Visible = False
' GridView1.Columns(11).Visible = False
' GridView1.Columns(12).Visible = False
' GridView1.Columns(16).Visible = False
' End If

End Sub

Protected Sub GridView1_RowCommand(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.GridViewCommandEventArgs) Handles GridView1.RowCommand

End Sub

Protected Sub GridView1_SelectedIndexChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles GridView1.SelectedIndexChanged
Dim quanti As String
Dim netto As String
Dim subtot As String
Dim uv As String
uv = GridView1.SelectedRow.Cells(6).Text
Dim tbx As TextBox = DirectCast(GridView1.SelectedRow.FindControl("box"), TextBox)
quanti = tbx.Text * uv
netto = GridView1.SelectedRow.Cells(11).Text
subtot = quanti * netto
Dim stringa As String

stringa = ("INSERT INTO tabella_carrello (Username, codice, prodotto, quantita, prezzo, subtotale)" + _
"VALUES ('" + _
My.User.Name + "','" + _
GridView1.SelectedRow.Cells(5).Text + "','" + _
GridView1.SelectedRow.Cells(6).Text + "','" + _
quanti + "','" + _
netto + "','" + _
subtot) + "')"
With DScarrello
.InsertCommand = stringa
<b> .Insert() </b>
End With
End Sub
End Class

----------------------------------
dopo aver impostato

il customerror su OFF per l'inserimento sull' MDB mi segnala la riga in grassetto
ribadisco che in locale funziona.

scusatemi ma sono novizio quindi sicuramente mi sbaglio in qualcosa!

Torna su

Stanze Forum

Elenco Threads

Partecipa anche tu! Registrati!

Hai bisogno di aiuto ?
Perchè non ti registri subito?

Dopo esserti registrato potrai chiedere
aiuto sul nostro Forum oppure aiutare gli altri

Consulta le Stanze disponibili.

Registrati ora !