Hej hej
En annan liten fråga som förmodligen är jättebasic. Men det är 1:a ggn jag råkar ut för det....
Jag har följande kod:
Dim SQL As String = "UPDATE...
Dim Conn As New SqlConnection(strConn)
Dim Command As New SqlCommand(SQL, Conn)
Conn.Open()
Try
Command.ExecuteNonQuery()
Command = New SqlCommand("SELECT...
Dim IdExist As Integer = CInt(Command.ExecuteScalar())
'Response.Write(IdExist)
If IdExist = 0 Then
'Response.Write("<br>Skapa en ny post")
If Int(PublishedNews.Checked) = 1 Then
Command = New SqlCommand("INSERT INTO ...
Command.ExecuteNonQuery()[B]
ActionDone.ForeColor = System.Drawing.Color.Green
ActionDone.Text = " - Nyheten Sparad / "[/B]
End If
ElseIf IdExist <> 0 Then
If Int(PublishedNews.Checked) = 1 Then
'Response.Write("<br>Uppdatera posten...")
Dim SQL2 As String = "UPDATE ...
Dim Conn2 As New SqlConnection(strConn)
Dim Command2 As SqlCommand
Command2 = New SqlCommand(SQL2, Conn2)
Conn2.Open()
Command2.ExecuteNonQuery()
Conn2.Close()[B]
ActionDone.ForeColor = System.Drawing.Color.Green
ActionDone.Text = " - Nyheten uppdaterad / "[/B]
Else
'Response.Write("<br>Tar bort posten...")
Command = New SqlCommand("DELETE FROM ...
Command.ExecuteNonQuery()[B]
ActionDone.ForeColor = System.Drawing.Color.Green
ActionDone.Text = " - Nyheten borttagen / "[/B]
End If
End If
SaveHuvData()
Conn.Close()
ActionDone.ForeColor = System.Drawing.Color.Green
[B]ActionDone.Text = " - Huvuddel Sparad"[/B]
I de fetstilta delarna har jag meddelandet som jag vill visa vid postback.
Som det är nu får jag bara med mig den sista tilldelningen (Givetvis). Det jag undrar är hur jag bara kan plussa på strängerna på varandra...
Jag vet.... Förmodlingen en struntsak... Men just nu har vi 28 grader varmt och en luftfuktighet på 40% i lokalen, tangenterna är klibbiga, svetten rinner..., Solen gassar på lite mer... Bänkvärmarna här utanför knäcker sin första kalla för dagen...
Mao... Det står hyfsat still på kontoret däruppe...
Tack för uppmärksamheten