webForumDet fria alternativet

uppdatera fält i mysql

ASP

1 svar · 276 visningar · startad av golgata

Medlem sedan maj 2000131 inlägg
Frågan#1

Har följande kod men den är anpassad för Access. Hur skriver jag om den så att den passar mysql.
Scriptet gör så att man plusar på första siffran i strängen med 1.
t.ex
1b till 2b
2a blir 3a
osv

<%
Dim usestr, str, str1

öppning av databasen

Do Until RecSet.EOF

usestr = RecSet("klass")
str = Mid(usestr, 1, 1)
str1 = Mid(usestr, 2)

If str>="0" and str<="9" Then
  RecSet("klass") = (CLng(str) + 1) & str1
  RecSet.Update
End If
  
RecSet.MoveNext
Loop
  
RecSet.Close%>
Medlem sedan dec. 200012 464 inlägg
#2
conn.execue "update t set klass = " & _
" concat(left(klass,1) + 1,substring(klass from 2)) " & _
" where left(klass,1) between '0' and '9' "

Designmässigt är det ingen bra ide att lagra sammansatta värden i en kolumn.

249 ms totalt · 4 externa anrop · v20260731065814-full.a51de22e
122 ms — deklarationer (db)
0 ms — hämta statistik (cache)
124 ms — hämta tråd, inlägg och bilagor (db)
122 ms — ändringar (db)