Usamos cookies para medir audiência e melhorar sua experiência. Você pode aceitar ou recusar a qualquer momento. Veja sobre o iMasters.
Minha aplicação funciona normalmente. A rotina vai no banco de dados, pega um número, multiplica pelo valor de algum text, e mostra em outro text.. Bem simples..
Tudo funciona normalmente, a consulta funciona, as variáveis estão ok..
Mas online não funciona! Ao invés de puxar o valor correto da tabela, a aplicação puxa "0".. e o resultado dos texts é "0"...
*É exatamente a mesma página, usando o mesmo banco.
Alguém tem alguma idéia?
Obrigado!
Olá quintelab! Obrigado pela resposta. O código é esse:
Imports System.Data
Imports MySql.Data.MySqlClient
Partial Class _Default
Inherits System.Web.UI.Page
Protected Sub txtValorTotal_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles txtValorTotalNota.TextChanged
If txtValorTotalNota.Text = "" Then
lblErro_Data.Text = "<br> <font color=red size=2> Digite o valor </font> "
txtDtEmissao.Focus()
Else
Dim Valor As Double
Valor = txtValorTotalNota.Text
Dim cnBancoDados As New MySqlConnection("Server=mysql01.servidor.com.br;Database=database;Uid=usuario;Pwd=senha;")
cnBancoDados.Open()
Dim cmBusca As New MysqlCommand
cmBusca.CommandText = "Select * from tbTabela where RegimeTributario = '" & "Lucro Presumido" & "' and Recipiente = '" & ddlDestinatario.SelectedValue & "' "
cmBusca.Connection = cnBancoDados
Dim drResultado As MysqlDataReader
drResultado = cmBusca.ExecuteReader()
If drResultado.HasRows = True Then 'se tiver resultados
Do While drResultado.Read()
Dim Pis As Double = drResultado("PIS")
txtPIS.Text = "PIS, " & Valor & ", " & Pis 'linha para verificação do que está sendo o erro. Retornou "PIS", o valor correto e o valor do dataReader como "0"
'txtPIS.Text = Valor * (drResultado("PIS") / 100)
txtCOFINS.Text = Valor * (drResultado("COFINS") / 100)
txtCSLL.Text = Valor * (drResultado("CSLL") / 100)
If drResultado("INSS") <> 0 Then
txtINSS.Enabled = True
txtINSS.Text = Valor * (drResultado("INSS") / 100)
Else
txtINSS.Text = ""
txtINSS.Enabled = False
End If
Loop
End If
drResultado.Close()
cnBancoDados.Close()
End If
End SubObrigado!
Amigos.... Já estou me convencendo que isso é algum problema de configuração..
Aconteceu a mesma coisa denovo!!! No debug as coisas funcionam e online não!! E agora não teve interação com o banco de dados, foi apenas conversão de valores..
Meu web.config está assim:
<?xml version="1.0"?>
<!--
Note: As an alternative to hand editing this file you can use the
web admin tool to configure settings for your application. Use
the Website->Asp.Net Configuration option in Visual Studio.
A full list of settings and comments can be found in
machine.config.comments usually located in
\Windows\Microsoft.Net\Framework\v2.x\Config
-->
<configuration>
<appSettings/>
<connectionStrings/>
<system.web>
<!--
Set compilation debug="true" to insert debugging
symbols into the compiled page. Because this
affects performance, set this value to true only
during development.
Visual Basic options:
Set strict="true" to disallow all data type conversions
where data loss can occur.
Set explicit="true" to force declaration of all variables.
-->
<compilation debug="false" strict="false" explicit="true">
<assemblies>
<add assembly="System.Design, Version=2.0.0.0, Culture=neutral, PublicKeyToken=B03F5F7F11D50A3A"/>
<add assembly="System.Web.Extensions, Version=1.0.61025.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35"/>
<add assembly="System.Web.Extensions.Design, Version=1.0.61025.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35"/>
<add assembly="System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=B77A5C561934E089"/>
<add assembly="WindowsBase, Version=3.0.0.0, Culture=neutral, PublicKeyToken=31BF3856AD364E35"/>
<add assembly="MySql.Data, Version=5.0.8.1, Culture=neutral, PublicKeyToken=C5687FC88969C44D"/></assemblies>
</compilation>
<pages>
<namespaces>
<clear/>
<add namespace="System"/>
<add namespace="System.Collections"/>
<add namespace="System.Collections.Generic"/>
<add namespace="System.Collections.Specialized"/>
<add namespace="System.Configuration"/>
<add namespace="System.Text"/>
<add namespace="System.Text.RegularExpressions"/>
<add namespace="System.Web"/>
<add namespace="System.Web.Caching"/>
<add namespace="System.Web.SessionState"/>
<add namespace="System.Web.Security"/>
<add namespace="System.Web.Profile"/>
<add namespace="System.Web.UI"/>
<add namespace="System.Web.UI.WebControls"/>
<add namespace="System.Web.UI.WebControls.WebParts"/>
<add namespace="System.Web.UI.HtmlControls"/>
</namespaces>
</pages>
<!--
The <authentication> section enables configuration
of the security authentication mode used by
ASP.NET to identify an incoming user.
-->
<authentication mode="Windows"/>
<!--
The <customErrors> section enables configuration
of what to do if/when an unhandled error occurs
during the execution of a request. Specifically,
it enables developers to configure html error pages
to be displayed in place of a error stack trace.
<customErrors mode="RemoteOnly" defaultRedirect="GenericErrorPage.htm">
<error statusCode="403" redirect="NoAccess.htm" />
<error statusCode="404" redirect="FileNotFound.htm" />
</customErrors>
-->
</system.web>
<system.codedom>
</system.codedom>
<!--
The system.webServer section is required for running ASP.NET AJAX under Internet
Information Services 7.0. It is not necessary for previous version of IIS.
-->
<system.webServer>
</system.webServer>
</configuration>
Cara a possibilidade é não estar no mesmo banco.
Mas poste uma a parte do código e como esta a estrutura do seu banco.
Abraços...