ACCESSにて

質問

教えて下さい。
テーブル：A
フィールド名：IP

192.168.1.1
192.168.10.100
のデーターをクエリーにて
192.168.1
192.168.10
ってやりたいのですが？？？です。
ヒントや参考URLでも構いませんので宜しく御願いいたします。

回答No.2

Dxak · ベストアンサー

Left([IP],Instr(Instr(Instr(1,[IP],".")+1,[IP],".")+1,[IP],".")-1)

べたな手で、こんな感じで式を使うとか？

お礼

Dxak様
まさにこれです。
ありがとう御座いました。

回答No.1

noname#140971

UPDATE A SET IP = CutStr(IP,".",1) & "." & CutStr(IP,".",2) & "." & CutStr(IP,".",3)

更新クエリのSQLビューです。

[イミディエイト]
? CutStr("192.168.1.1", ".", 1)
192
? CutStr("192.168.1.1", ".", 2)
168
? CutStr("192.168.1.1", ".", 3)
1

次の CutStr関数でシコシコと合成するやり方です。

Public Function CutStr(ByVal Text As String, _
　　　　　　　　　　　 ByVal Separator As String, _
　　　　　　　　　　　 ByVal N As Integer) As String
　　Dim strDatas() As String

　　strDatas = Split("" & Separator & Text, Separator, , 0)
　　CutStr = strDatas(N * Abs((N <= UBound(strDatas))))
End Function

お礼

Husky2007様
No2の方のやり方で無事出来ましたが、この方法でもやってみたいと思います。
ありがとう御座いました。