---
title: "uppdatera eller lägga till"
type: "forum-thread"
url: "https://www.webforum.nu/amne/asp/110086-uppdatera-eller-lägga-till"
topic: "ASP"
topic_url: "https://www.webforum.nu/amne/asp"
author: "WebbisNet"
published: "2004-08-26T15:59:18.000Z"
updated: "2004-08-27T08:37:43.000Z"
replies: 1
views: 247
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/asp/110086-uppdatera-eller-lägga-till"
---

# uppdatera eller lägga till

## #1 — WebbisNet, 2004-08-26T15:59Z

Har lite problem med den här koden. Om inte IP-numret finns (Address) så ska den lägga till en rad, annars ska den uppdatera raden med 1

Finns inte adressen så läggs den till och Visits sätts till ett, finns en så ska den uppdateras och Visits ska uppdateras med 1 och bli 2

```
strHost = Request.ServerVariables("REMOTE_HOST")
strAddress = Request.ServerVariables("REMOTE_ADDR")
nowDate = Now()

If not strAddress="&Address&" Then
	SET objConn = connect()
	count = "INSERT INTO tblStats"
	count = count & "(Host, Address, countDate,Visits) "
	count = count & "VALUES('"& strHost &"','"& strAddress &"','" & nowDate & "',1)"
	objConn.Execute count
else
update="UPDATE tblStats SET Visits=Visits + 1 WHERE Address='"&strAddress&"' AND nowDate="&nowDate&""
objConn.Execute update

End If
```

Permalänk: https://www.webforum.nu/p/110086

## #2 — Vide, 2004-08-27T08:37Z

Något sånthär?

```
strHost = Request.ServerVariables("REMOTE_HOST")
strAddress = Request.ServerVariables("REMOTE_ADDR")
nowDate = Now()

set objConn = connect()

[b]strSQL = "select count(*) from tblStats where Address = '" & strAddress & "'"
set rsResults = objConn.Execute( strSQL )[/b]

If [b]rsResults( 0 ) = 0[/b] Then
	count = "INSERT INTO tblStats"
	count = count & "(Host, Address, countDate,Visits) "
	count = count & "VALUES('"& strHost &"','"& strAddress &"','" & nowDate & "',1)"
	objConn.Execute count
else
update="UPDATE tblStats SET Visits=Visits + 1 WHERE Address='"&strAddress&"' AND nowDate="&nowDate&""
objConn.Execute update

End If
```

Permalänk: https://www.webforum.nu/p/1419915

---

Tråden på webben: https://www.webforum.nu/amne/asp/110086-uppdatera-eller-lägga-till