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.
strSQL = "select * from acceptedorderscompare where (pizzaID = " & acceptedorders("pizzaID") & ")"' AND (EksTID = " & acceptedorders("EksTID") & ") AND (EksMID = " & acceptedorders("EksMID") & ")" acceptedorderscompare.Open strSQL, Conn, 3, 1
Den her laver lidt af samme fejl som "start" problem Response.Write(acceptedorderscompare.RecordCount & "<br>") <- der bliver ved man at værer -1 når jeg loop den
strSQL = "select * from acceptedorders" set acceptedorders = Conn.Execute(strSQL)
If Not acceptedorders.EOF Then
Do Until acceptedorders.EOF strSQL = "insert into acceptedorderscompare (PizzaID, EksTID, EksMID, allprice) values('" & acceptedorders("PizzaID") & "','" & acceptedorders("EksTID") & "','" & acceptedorders("EksMID") & "','" & acceptedorders("allprice") & "')" Conn.Execute(strSQL)
Set acceptedorderscompare = Server.CreateObject("ADODB.Recordset") strSQL = "select * from acceptedorderscompare where (pizzaID = " & acceptedorders("pizzaID") & ") AND (EksTID = " & acceptedorders("EksTID") & ") AND (EksMID = " & acceptedorders("EksMID") & ")" acceptedorderscompare.Open strSQL, Conn, 3, 1
Response.Write(acceptedorderscompare.RecordCount & "<br>") If acceptedorderscompare.RecordCount = 1 Then Response.Write("indskriv<br>") Else Response.Write("opdater<br>") End If acceptedorders.MoveNext Loop End If ' acceptedorderscompare.RecordCount = 1
Der er to fejl i det her scirpt 1)
Set acceptedorderscompare = Server.CreateObject("ADODB.Recordset") strSQL = "select * from acceptedorderscompare where (pizzaID = " & acceptedorders("pizzaID") & ") AND (EksTID = " & acceptedorders("EksTID") & ") AND (EksMID = " & acceptedorders("EksMID") & ")" acceptedorderscompare.Open strSQL, Conn, 3, 1
Hvis jeg har , eller ; i min RS så laver den en fejl Microsoft OLE DB Provider for ODBC Drivers error '80040e21'
ODBC driver does not support the requested properties.
2) Den bliver ved med kun at udskrive acceptedorderscompare.RecordCount som -1
Set acceptedorders = Server.CreateObject("ADODB.Recordset") <- den line havet jeg sat ind =) men det virkede også til at starte med + jeg har et andet script hvor jeg bruger den men nej =) he he men det ser ud til at der bare skulle nolge ' på min SQL =) JUBII
Takker for point, selv om jeg ikke er berettiget til nogle.......! :(
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.