25. januar 2004 - 00:35Der er
32 kommentarer og 1 løsning
SQL - Update eller Insert
Hvis Record findes læg 1 til Count ellers tilføj ny record
kan ikke finde ud af det !! hjælp mig med at rette følgende:
Set Conn = Server.CreateObject("ADODB.Connection") Conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("..\..\db\Seach.mdb") Set RS = Server.CreateObject("ADODB.Recordset") SQL = "SELECT * FROM KeyWords WHERE KeyWords = '" & Request.Form("SeachFor") & "'" RS.Open SQL, Conn, 3, 3
If RS.EOF then strSQL = "Insert into personer (KeyWords) " & "values( '" & Request.Form("SearchFor") & "')" 'RS.Execute(strSQL) else RS.Update RS("Count") = RS("Count") + 1 RS.Update End if
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
If RS.EOF then strSQL = "Insert into personer (KeyWords) " & "values( '" & Request.Form("SearchFor") & "')" 'RS.Execute(strSQL) else RS.Update RS("Count") = RS("Count") + 1 RS.Update End if
Skal rette til dette:
If RS.EOF then strSQL = "Insert into personer (KeyWords) " & "values('" & Request.Form("SearchFor") & "')" Conn.Execute(strSQL) else RS("Count") = RS("Count") + 1 RS.Update End if
Microsoft OLE DB Provider for ODBC Drivers error '80004005' [Microsoft][ODBC Microsoft Access Driver]General error Unable to open registry key 'Temporary (volatile) Jet DSN for process 0x240 Thread 0x934 DBC 0x9a625ac Jet'.
/Upload/Search.asp, line 53
Linie 53: Conn.open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("..\..\db\Seach.mdb")
nogle ting burde fungere som XHTML... (selv-rettende)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
