PROBLEMA AO PUBLICAR WEB SITE
criei um aplicativo web com asp.net com linguagem vb.
porem tenho 2 sub que carrega os dados na tela principal.
quando faço o teste usando o visual basic 2010 a pagina carrega normal (mostra tudo que deve, dados do usuario e da empresa.)
entao depois que compilo e envio para o servidor.
ai a pagina nao carrega normal, fica faltando dados.
como se nao tivesse encontrado algo para mostrar.
o que sera?
sera que nao ta atualizando os arquivos?
ou sera algo no codigo.
se alguem puder ajudar?
porem tenho 2 sub que carrega os dados na tela principal.
quando faço o teste usando o visual basic 2010 a pagina carrega normal (mostra tudo que deve, dados do usuario e da empresa.)
entao depois que compilo e envio para o servidor.
ai a pagina nao carrega normal, fica faltando dados.
como se nao tivesse encontrado algo para mostrar.
o que sera?
sera que nao ta atualizando os arquivos?
ou sera algo no codigo.
se alguem puder ajudar?
para quem se interessar me ajudar...
acesse o endereço :
www.smbatista.net
user: ROBSON
Senha: 123
aguardo respostas... obrigado!
acesse o endereço :
www.smbatista.net
user: ROBSON
Senha: 123
aguardo respostas... obrigado!
Poste uma imagem com a aplicacao em ambiente de desenvolvimento para que o problema fique mais claro.
Check as configurações de acesso ao banco de dados. Vc pode ter esquecido de alterar a string de conexão.
bom vamo la...
1º esta é a imagem do site rodando apartir do visual basic (F5):
Uploaded with ImageShack.us
-------------------------------------------------------------------------------------------------
2º agora e o site rodando no servidor depois de publicado.
Uploaded with ImageShack.us
--------------------------------------------------------------------------------------------------------------
agora o código:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ConnectMySQL()
Carregar_Dados_Usuario()
Carregar_Dados_Cotacao()
Seleciona()
DisconnectMySQL()
End Sub
Public Sub Carregar_Dados_Usuario()
Try
SQL = [Ô]select a.adID, a.adIDEMPR, a.adNOME, b.empRAZAO, b.empCNPJ [Ô] & _
[Ô]from admin a, empr b [Ô] & _
[Ô]where a.adIDEMPR=b.empID AND a.adID = [ô][Ô] & Trim(UsuLogado) & [Ô][ô] AND a.adIDEMPR=[ô][Ô] & Trim(EmprLogado) & [Ô][ô][Ô]
myCommand.Connection = myCON [ô] seta a conexao SQL
myCommand.CommandText = SQL [ô] Passa o parametro de filtragem SQL
myAdapter.SelectCommand = myCommand [ô] Conexao parametro passados para Objeto conector data Mysql
myAdapter.Fill(myData) [ô] passa os parametros e filtragem do objeto dataMySQL para o objeto data de uma grid caso queira alimentar uma grid
myDRR = myCommand.ExecuteReader [ô] define o datareader com a consulta SQL
myDRR.Read() [ô] ativa filtragem
lblNome0.Text = myDRR([Ô]adIDEMPR[Ô])
lblNome.Text = myDRR([Ô]adNOME[Ô])
lblRazao.Text = myDRR([Ô]empRAZAO[Ô])
lblCnpj1.Text = myDRR([Ô]empCNPJ[Ô])
myAdapter.Dispose()
myDRR.Close()
Catch ex As Exception
End Try
End Sub
Public Sub Carregar_Dados_Cotacao()
Try
Dim SQL1 As String
[ô]----------------------------------------------------
SQL1 = [Ô]select a.cotNUMPED AS PED, a.cotEMPRESA AS IDEMPR, [Ô] & _
[Ô]a.cotDATA AS DATA, b.empRAZAO AS RAZAOF, b.empCNPJ AS CNPJF [Ô] & _
[Ô]From COTACAO a, EMPR b [Ô] & _
[Ô]where b.empID=a.cotEMPRESA AND a.coTFECHADO=[ô]NAO[ô] [Ô]
myCommand.Connection = myCON [ô] seta a conexao SQL
myCommand.CommandText = SQL1 [ô] Passa o parametro de filtragem SQL
myAdapter.SelectCommand = myCommand [ô] Conexao parametro passados para Objeto conector data Mysql
myAdapter.Fill(myData) [ô] passa os parametros e filtragem do objeto dataMySQL para o objeto data de uma grid caso queira alimentar uma grid
myD = myCommand.ExecuteReader [ô] define o datareader com a consulta SQL
myD.Read() [ô] ativa filtragem
lblNumCot.Text = myD([Ô]PED[Ô])
lblDataCot.Text = FormatDateTime(myD([Ô]DATA[Ô]), DateFormat.ShortDate)
lblRazaoCot0.Text = myD([Ô]IDEMPR[Ô])
lblRazaoCot.Text = myD([Ô]RAZAOF[Ô])
lblCnpjcot.Text = myD([Ô]CNPJF[Ô])
myAdapter.Dispose()
myD.Close()
Catch ex As Exception
End Try
End Sub
lembrando que estou publicando apartir do visual basic.. nao to usando ftp(filezilla, cutftp, etc..)
mas tambem ja fiz o teste com estes.. mesmo assim nao funciona..
obrigado pessoal..
aguardo respostas.
ah... para o RICART, agradeço atençao mas nao tenho mysql na minha maquina ja faço os testes direto no servidor.. e funciona blz.. o problema é na hora de publicar. eu acho.
1º esta é a imagem do site rodando apartir do visual basic (F5):
Uploaded with ImageShack.us
-------------------------------------------------------------------------------------------------
2º agora e o site rodando no servidor depois de publicado.
Uploaded with ImageShack.us
--------------------------------------------------------------------------------------------------------------
agora o código:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
ConnectMySQL()
Carregar_Dados_Usuario()
Carregar_Dados_Cotacao()
Seleciona()
DisconnectMySQL()
End Sub
Public Sub Carregar_Dados_Usuario()
Try
SQL = [Ô]select a.adID, a.adIDEMPR, a.adNOME, b.empRAZAO, b.empCNPJ [Ô] & _
[Ô]from admin a, empr b [Ô] & _
[Ô]where a.adIDEMPR=b.empID AND a.adID = [ô][Ô] & Trim(UsuLogado) & [Ô][ô] AND a.adIDEMPR=[ô][Ô] & Trim(EmprLogado) & [Ô][ô][Ô]
myCommand.Connection = myCON [ô] seta a conexao SQL
myCommand.CommandText = SQL [ô] Passa o parametro de filtragem SQL
myAdapter.SelectCommand = myCommand [ô] Conexao parametro passados para Objeto conector data Mysql
myAdapter.Fill(myData) [ô] passa os parametros e filtragem do objeto dataMySQL para o objeto data de uma grid caso queira alimentar uma grid
myDRR = myCommand.ExecuteReader [ô] define o datareader com a consulta SQL
myDRR.Read() [ô] ativa filtragem
lblNome0.Text = myDRR([Ô]adIDEMPR[Ô])
lblNome.Text = myDRR([Ô]adNOME[Ô])
lblRazao.Text = myDRR([Ô]empRAZAO[Ô])
lblCnpj1.Text = myDRR([Ô]empCNPJ[Ô])
myAdapter.Dispose()
myDRR.Close()
Catch ex As Exception
End Try
End Sub
Public Sub Carregar_Dados_Cotacao()
Try
Dim SQL1 As String
[ô]----------------------------------------------------
SQL1 = [Ô]select a.cotNUMPED AS PED, a.cotEMPRESA AS IDEMPR, [Ô] & _
[Ô]a.cotDATA AS DATA, b.empRAZAO AS RAZAOF, b.empCNPJ AS CNPJF [Ô] & _
[Ô]From COTACAO a, EMPR b [Ô] & _
[Ô]where b.empID=a.cotEMPRESA AND a.coTFECHADO=[ô]NAO[ô] [Ô]
myCommand.Connection = myCON [ô] seta a conexao SQL
myCommand.CommandText = SQL1 [ô] Passa o parametro de filtragem SQL
myAdapter.SelectCommand = myCommand [ô] Conexao parametro passados para Objeto conector data Mysql
myAdapter.Fill(myData) [ô] passa os parametros e filtragem do objeto dataMySQL para o objeto data de uma grid caso queira alimentar uma grid
myD = myCommand.ExecuteReader [ô] define o datareader com a consulta SQL
myD.Read() [ô] ativa filtragem
lblNumCot.Text = myD([Ô]PED[Ô])
lblDataCot.Text = FormatDateTime(myD([Ô]DATA[Ô]), DateFormat.ShortDate)
lblRazaoCot0.Text = myD([Ô]IDEMPR[Ô])
lblRazaoCot.Text = myD([Ô]RAZAOF[Ô])
lblCnpjcot.Text = myD([Ô]CNPJF[Ô])
myAdapter.Dispose()
myD.Close()
Catch ex As Exception
End Try
End Sub
lembrando que estou publicando apartir do visual basic.. nao to usando ftp(filezilla, cutftp, etc..)
mas tambem ja fiz o teste com estes.. mesmo assim nao funciona..
obrigado pessoal..
aguardo respostas.
ah... para o RICART, agradeço atençao mas nao tenho mysql na minha maquina ja faço os testes direto no servidor.. e funciona blz.. o problema é na hora de publicar. eu acho.
Aproveitando o gancho do tópico. Estou com um webserver rodando maravilhosamente bem, quando invocado externamente.
Por exemplo :
Se chamo ele de outra rede(internet) através do dominio xxxxxxxx.com , funciona bem, inclusive uma rotina de impressão remota que criei funciona.
Porém se eu utilizar o mesmo dominio xxxxxxx.com dentro da rede onde esta o servidor , não vai nem com reza braba, e eu PRECISARIA fazer o servidor(iis 6.0) responder em qualquer endereço, seja ele local (192.168.1.xxx) ou dominio xxxxxxxx.com ou ainda no ip fixo 200.xxx.xxx.xxx.
Sei que é uma configuração no servidor iis, mas como não manjo muito disso, to passando por essa dificuldade.
Por exemplo :
Se chamo ele de outra rede(internet) através do dominio xxxxxxxx.com , funciona bem, inclusive uma rotina de impressão remota que criei funciona.
Porém se eu utilizar o mesmo dominio xxxxxxx.com dentro da rede onde esta o servidor , não vai nem com reza braba, e eu PRECISARIA fazer o servidor(iis 6.0) responder em qualquer endereço, seja ele local (192.168.1.xxx) ou dominio xxxxxxxx.com ou ainda no ip fixo 200.xxx.xxx.xxx.
Sei que é uma configuração no servidor iis, mas como não manjo muito disso, to passando por essa dificuldade.
Eu diria que você tem um erro muito grave ali, que é um Try/Catch que não faz nada, simplesmente faz com que qualquer erro seja ignorado.
Eu removeria esse Try/Catch para ver se não ocorre um erro no servidor, e diria para você nunca usar tratamentos de erro desta forma, eles devem sempre fazer alguma coisa, nem que seja apenas avisar que ocorreu um erro.
Eu removeria esse Try/Catch para ver se não ocorre um erro no servidor, e diria para você nunca usar tratamentos de erro desta forma, eles devem sempre fazer alguma coisa, nem que seja apenas avisar que ocorreu um erro.
pessoal, pelo jeito parece que arrumei....
coloquei para mostrar o erro:
no aquivo Web.Config
<customErrors mode=[Ô]Off[Ô]/>
entao ele apontou para isto..
lblDataCot.Text = FormatDateTime(myD([Ô]DATA[Ô]), DateFormat.ShortDate)
dizendo que nao poderia converter
entao coloquei assim e funcionou
myDRR([Ô]DATA[Ô])
blz... agradeço a atencao de todos..
coloquei para mostrar o erro:
no aquivo Web.Config
<customErrors mode=[Ô]Off[Ô]/>
entao ele apontou para isto..
lblDataCot.Text = FormatDateTime(myD([Ô]DATA[Ô]), DateFormat.ShortDate)
dizendo que nao poderia converter
entao coloquei assim e funcionou
myDRR([Ô]DATA[Ô])
blz... agradeço a atencao de todos..
Tópico encerrado , respostas não são mais permitidas