dotNETportal.cz

Zdravím všechny...

snažím se překopat svoji offline aplikaci na webovou

při použití VB pro odeslání vstupu do databáze se objeví error:

Chyba kompilace

Popis: Při kompilaci prostředku, který je zapotřebí pro zpracování tohoto požadavku, došlo k chybě. Prohlédněte si následující podrobnosti o chybě a příslušným způsobem upravte zdrojový kód. 

Chybová zpráva kompilátoru: BC30506: Klauzule Handles vyžaduje proměnnou WithEvents definovanou v nadřazeném typu nebo v některém z jeho základních typů.

Zdrojová chyba:


Řádek 3:  Partial Class _Default
Řádek 4:      Inherits System.Web.UI.Page
Řádek 5:      Protected Sub SaveItemBt_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles SaveItemBt.Click
Řádek 6:  
Řádek 7:          Dim SQLDotaz As String

Zdrojový soubor: C:\Documents and Settings\Dusan\Dokumenty\Visual Studio 2008\Projects\Freya-tehotenske-obleceni.cz\Freya-tehotenske-obleceni.cz\Admin\Default.aspx.vb    Řádek: 5 

ZDROJ:

Imports System.Data.SqlClient

Partial Class _Default
    Inherits System.Web.UI.Page
    Protected Sub SaveItemBt_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles SaveItemBt.Click

        Dim SQLDotaz As String
        Dim ConnectionString As String
        ConnectionString = "Server=localhost\SQLEXPRESS;Initial Catalog=freya_maternity;Trusted_Connection=yes;"
        Dim Conn As New SqlConnection(ConnectionString)
        Dim Cmd As SqlCommand

        SQLDotaz = " INSERT INTO zbozi (NazevZbozi) VALUES ('" & Name.Text & "')"

        Try
            'Pridani zaznamu do tabulky OK
            Conn.ConnectionString = ConnectionString
            Conn.Open()
            Cmd = New SqlCommand(SQLDotaz, Conn)
            Cmd.ExecuteNonQuery()
        Catch ex As Exception

        End Try



    End Sub
    
End Class

Na stránce asi nemáte komponentu s ID SaveItemBt.

A mimochodem pokud takhle hloupě skládáte SQL dotazy, tak vám ten web asi velice brzy někdo hackne.

Přesně tak. Data nevkládat do SQL dotazu ale pomocí parametrů!

Návod zde: http://vbnet.cz/clanek--52-komunikace_s_...

Zdravím,

díky za odpověď, problém byl skutečně v špatně navrženém "bt" (móžna chyba někde v kopírování stránek mezi adresářemi. Tohle jsem již vyřešil.

O problému se skládáním dotazu vím... teď jenom testuji možnosti a ve finální verzi by to mělo být OK. A rád bych pak zde kód/projekt poskytl...

Nyní řeším problém jak na stránku pomocí VB kódu dostat určitý počet TAGů... rád bych to řešil TAGama kvůli pohodlnéjšímu formátování pomocí CSS. Představa je takováhle:

dim a=PocetZaznamu

while i<=a do
<p>Cislo "i" <p>
i=i+1
...

chci to na složitější výpis (tabulky, labely, hodnoty z DB)

a navrch ještě udělat stránkování...

Nejdřív si laskavě o ASP.NET něco přečtěte, na tohle všechno jsou tam komponenty a nedá se udělat nic horšího, než že takhle začnete kusy HTML skládat sám.

Nečekal jsem, že na tohle dostanu odpověď, spíš jsme chtěl říct co řeším dál :) ale dobře když už se toho někdo chytil, co tedy hledat?

díky za MSTV.cz

asi jsme tam našel jiné řešení toho co jsem chtěl udělat... uvidíme večer.

ale zajímalo by mne zda existuje něco jak

Page.Header.Title = aaa

i pro body kdy bych měl v

aaa=<P>AHoj<P>

a chtěl toto přidat na konec dokumentu